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ABSTRACT 

Bubble  memory  is  an  emerging  technology  that  is  only 
beginning  to  realize  it's  potential.   The  unique  properties 
that  this  memory  system  possesses  provides  advantages  in 
many  situations.   Bubble  memory  is  non-volatile,  solid  state, 
and  very  durable.   In  addition  this  memory  has  a  high  density 
and  a  fast  access  time.   These  attributes  are  excellent  for 
the  non-ideal  conditions  found  in  industry  and  the  military. 

This  thesis  presents  an  implementation  of  an  iSBC  254 
Bubble  Memory  System  as  a  disk  resource  in  a  standard 
microcomputer  environment.   An  Intel  8086  microprocessor  is 
used  as  the  host  executing  under  Digital  Research's  CP/M-86 
operating  system.   This  implementation  is  completely 
transparent  to  the  user  and  requires  no  additional  disk 
commands . 
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I .   INTRODUCTION 

Magnetic  bubble  memory  is  a  non-volatile,  high  density, 
reliable  memory  system.   It  is  superior  in  many  ways  to 
conventional  secondary  storage  systems.   It's  resistance  to 
oppressive  environmental  conditions  is  a  strong  impetus  for 
bubble  memory's  continuing  growth.   In  addition,  other 
characteristics  enhance  this  memory's  value  to  the 
marketplace.   It's  advantages  make  bubble  memory  a  viable 
alternative  in  many  situations. 

The  objective  of  the  work  presented  here  is  to 
demonstrate  the  utility  of  a  bubble  memory  system  in  a 
conventional  operating  system  (CP/M-86)  using  a  commercially 
available  microprocessor  (Intel  8086) . 

The  stated  objective  is  accomplished  in  two  phases. 
First  a  basic  I/O  driver  is  developed  to  exercise  the  iSBC 
254  Bubble  Memory  System.   This  driver  tests  critical 
operations  necessary  for  additional  development.   All 
functions  significant  in  data  transfer  operations  are  tested 
for  proper  operation.   The  basic  driver  program  also  provides 
a  medium  for  software  development  and  debugging.   The  next 
step  involves  the  incorporation  of  the  bubble  memory  into 
CP/M-86  as  a  disk  resource.   This  task  requires  altering  the 
BIOS  portion  of  the  operating  system.   A  new  BIOS  was 
generated  containing  the  necessary  bubble  memory  subroutines 
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in  a  modularized  format.   The  implementation  as  a  disk  is 
entirely  transparent  to  the  user.   Procedures  for  utilizing 
the  bubble  memory  do  not  differ  from  a  typical  disk  system. 

Additionally,  chapter  2  discusses  in  some  detail  the 
theory  of  bubble  magnetic  domains.   This  section  also  gives 
background  on  typical  bubble  memory  system  development  and 
status.   A  thorough  description  of  the  hardware  utilized  in 
this  thesis  is  given  in  chapter  3.   The  developmental  system 
is  functionally  outlined  and  the  iSBC  254  bubble  memory 
board  is  described  in  detail. 


II.   BUBBLE  MEMORY  THEORY 

A.   BUBBLE  DOMAIN  THEORY 

Bubble  domains  are  small,  magnetized,  mobile  regions 
within  sheets  or  films  of  certain  magnetic  materials.   This 
magnetic  "bubble"  is  a  physical  phenomenon  not  unique  to  any 
one  class  of  chemical  compositions.   Certain  elements  and 
their  alloys,  notably  iron,  cobalt  and  the  rare  earth  elements, 
exhibit  the  property  of  f erromagnetism.   Presently,  nearly 
all  bubble  devices  are  made  with  single-crystal  films  of 
mult icomponent  magnetic  rare  earth- iron  oxides  having  the 
garnet  structure  [Reference  1].   Ferromagnetism  permits  the 
material's  atoms  to  exhibit  a  high  degree  of  alignment 
despite  the  natural  tendency  toward  random  arrangements. 
The  rule  of  opposites  attracting  comes  into  play  in  bubble 
memory  technology.   The  domains  existing  in  a  substance  are 
magnetized  in  either  a  positive  (up)  direction  or  negative 
(down)  direction.   In  the  absence  of  an  external  field  the 
domains  interact  with  one  another,  resulting  in  zero  net 
magnetism.   The  more  "up"  domains  you  have,  the  more 
strongly  they  interact  with  those  pointing  "down,"  causing 
the  bubble  to  grow  larger  [Reference  2] .   An  opposite  force 
to  this  ballooning  effect  occurs  at  the  wall  of  the  bubble, 
where  domains  are  in  various  stages  of  pointing  down, 
crossways,  and  up  (see  Figure  2.1).  This  area  of  transition 
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Figure  2.1 
BUBBLE  DOMAIN  MAGNETIZATION 
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bounding  the  bubble  tends  to  widen  and  slow  the  bubble's 
growth.   The  forces  never  balance  and  the  bubble  either 
continues  to  grow  or  collapses  upon  itself.   Thus  the 
ferromagnetic  substance  is  a  continually  changing  pattern 
of  serpentine  strips  (see  Figure  2.2a). 

When  the  magnetic  substrate  is  cut  properly  into  a  thin, 
flat  wafer,  the  domains  jut  perpendicularly  through  the 
plane  of  the  chip.   Their  positive  ends  pointing  up  or  down 
(see  Figure  2.2a).   Making  bubbles  stable  (and  useful)  is 
accomplished  by  applying  an  external  magnetic  field.   The 
strip  domains  magnetized  in  the  direction  of  the  magnetic 
field  will  increase  in  volume  while  those  magnetized  in  the 
opposite  direction  will  shrink  (see  Figure  2.2b).   The 
domains  will  continue  to  be  reduced  until  they  completely 
disappear  or  until  they  reach  a  specific  size  (see  Figure  2.2c). 
The  strength  of  the  external  magnetic  field  is  the  determining 
factor  [Reference  2].   In  actual  bubble  memory  devices,  the 
domains  shrink  until  they  are  approximately  .0001  inch  wide. 
When  viewed  from  above  using  a  microscope  they  appear  round, 
hence'  the  bubble  designation  [Reference  3]  .   This  phenomenon 
is  the  result  of  the  process  of  energy  minimization. 

The  applied  external  field,  the  bias  field,  is  essential 
for  bubble  stability.   As  long  as  this  field  is  kept  constant, 
the  bubbles  neither  expand  or  contract  and  are  held  at  an 
acceptable  size.   The  strength  of  the  bias  field  necessary 
to  maintain  stability  is  of  the  order  of  100-200  Oersteds. 
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Small  permanent  magnets  can  easily  supply  the  field 
strength  required.   These  permanent  magnets  are  immune  to 
power  fluctuations  and  are  the  reason  that  bubble  memory  is 
non-volatile.   The  stable  equilibrium  of  the  bubble  domains 
is  the  result  of  a  combination  of  three  forces.   The  domain 
is  preserved  by  its  own  magnetization  acting  against  that 
of  the  external  field.   The  internal  forces  produced 
counteracts  the  squeezing  forces  of  the  bias  field.   The 
circular  shape  is  preserved  by  the  magnetic  surface  tension 
located  at  the  domain  walls  [Reference  3] . 

In  order  to  produce  an  operational  memory  system,  the 
bubble  domains  had  to  be  moved  through  the  substrate  in  an 
orderly  fashion.   Moving  bubbles  requires  setting  up  a 
magnetic  field  gradient  within  the  plane  of  the  chip.   This 
magnetic  gradient  unbalances  the  stability  of  the  bubble. 
The  domains  will  then  move  through  the  substrate  toward  any 
position  that  minimizes  energy.   A  permaloy  (nickel-iron 
alloy)  track  can  be  bonded  to  the  surface  of  the  substrate 
(see  Figure  2.3).   The  bubbles  will  move  along  these  tracks 
when  the  magnetic  gradient  is  applied  in  a  specific  manner. 
At  a  designated  point  where  a  detector  is  located,  the 
presence  of  a  bubble  can  represent  a  binary  1.   The  absence 
of  a  bubble  represents  a  binary  0.   This  magnetic  detection 
is  similar  to  conventional  magnetic  devices.   The 
distinguishing  feature  is  the  fact  that  no  mechanical  moving 
parts  are  present.   This  factor  allows  a  bubble  memory 
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system  to  be  entirely  solid  state.   Bubble  memory's 
nonvolatility  makes  it  useful  for  almost  any  situation  in 
which  data  that  is  being  stored  must  be  maintained. 
Nonvolatility  also  makes  bubble  memory  portable.   A  user 
can  remove  the  device  from  one  computer,  transport  it  and 
find  all  data  intact.   The  fact  that  this  memory  is  not 
electromechanical  adds  to  its  reliability  and  durability. 
[Reference  2]   The  next  section  will  describe  how  bubble 
theory  has  been  applied  in  memory  engineering. 

B.   APPLICATION  OF  BUBBLE  THEORY 

This  section  will  describe  the  general  designs  of 
bubble  memory  devices.   The  basic  operations  necessary  to 
support  a  system  are,  bubble  propagation,  bubble  generation, 
and  bubble  detection  [Reference  1].   In  addition  to  these 
basic  functions,  the  data  must  be  organized  in  such  a  way 
as  to  minimize  access  time. 

1 .   Bubble  Propagation 

As  previously  mentioned,  the  bubble  domains  will 
move  in  the  presence  of  a  magnetic  field  gradient.   A 
rotating  bias  field  set  within  the  plane  of  the  chip 
accomplishes  this  task.   The  chip  is  wrapped  with  two 
crossed  wire  coils  and  the  appropriate  current  is  passed 
through  them.   By  rotating  this  field,  known  as  the  drive 
field,  a  magnetic  impulse  can  be  generated  through  the  device. 
The  bubble  domains  travel  with  this  impulse  and  thus  movement 
is  created  [Reference  4] . 
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beginning  of  the  input  track.   The  seed  is  generated  by  an 
electric  current  pulse  in  a  hairpin-shaped  loop  of 
conductive  material.   The  pulse  is  strong  enough  to  reverse 
the  bias  field  locally  and  thus  allow  a  bubble  domain  to  be 
created.   Once  having  been  created,  the  seed  bubble  remains 
in  existence  as  long  as  the  external  bias  field  is  maintained 
The  seed  circulates  under  a  permalloy  patch,  driven  by  the 
rotating  field.   This  bubble  is  constrained  to  a  kidney 
shape  by  the  interaction  of  the  bias  and  rotating  fields 
with  the  metal  patch  (see  Figure  2.4).   The  seed  is  split 
in  two  by  a  current  pulse  in  the  hairpin-shaped  conductor. 
One  of  them  remains  under  the  patch  as  the  seed,  and  the 
other  is  driven  by  the  rotating  field  onto  the  input  track 
section  of  the  chip.   The  current  pulse  that  splits  the 
seed  is  generated  to  store  a  binary  1  in  memory.   To  store 
a  binary  0,  the  pulse  is  omitted.   This  seed  bubble  process 
is  extremely  temperature  sensitive.   A  memory  system  must 
be  able  to  vary  the  current  pulse  over  a  range  large  enough 
to  compensate  for  large  temperature  variations . [Reference  4] 
3.   Bubble  Detection 

A  bubble  detector  is  essentially  a  magneto-resistive 
bridge  formed  by  interconnecting  the  permalloy  chevrons  to 
make  a  continuous  electrical  path  of  maximum  length.   As 
bubbles  pass  under  the  bridge,  the  resistance  changes 
slightly,  modulating  the  currents  through  the  bridge  and 
creating  an  output  voltage  of  several  millivolts.   Bubbles 
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are  stretched  at  right  angles  to  the  direction  of 
propagation  by  adding  parallel  rows  of  chevrons.   These 
stretched  bubbles  generate  larger  output  signals  at  the 
detector.   Beyond  the  detector  the  bubbles  run  into  the 
guard  rail  and  they  are  annihilated  (see  Figure  2.5) 
[Reference  4] . 

4 .   Bubble  Architecture 

The  architectures  presented  here  follow  one  another 
in  the  historical  development  of  bubble  memory  systems. 
Each  improved  the  data  transfer  rates  critical  to  acceptance 
as  a  viable  memory  source. 

a.  Shift  Register  Configuration 

The  shift  register  architecture  suffers  from 
two  fundamental  problems:   (1)  If  a  single  defect  exists 
in  the  shift  register  chain,  the  entire  chip  is  bad;  and, 
(2)  Data  must  be  cycled  through  the  entire  chip  in  order 
for  the  user  to  gain  access  to  what  is  needed.   If  the 
device  is  a  1M  bit  chip  and  the  information  is  stored 
halfway  down  the  chain,  all  the  bubbles  must  move  half  the 
length  of  the  chain,  in  this  case  500,000  steps.   A  typical 
circulating  frequency  is  200kHz.   In  the  above  example  it 
would  take  over  2  seconds  to  access  the  data  desired 
[Reference  2] .   This  clearly  is  unacceptable  in  modern 
computer  systems  (see  Figure  2.6a). 

b.  Major-Minor  Loop  Design 

The  problems  of  the  shift  register  approach 
were  alleviated  by  employing  major  and  minor  loop 

20 


MAGNET0RESIST1VE 
DETECTOR 


°  OUTPUT 

TRACK 


Figure  2.5 
BUBBLE  DETECTOR 


21 


Generate 


Detector 


(a) 


Replicate/transfer 


iene  rate 


De  tector 


c 


I  Major    looo 
■* '-^ 


±t 


As 


A\ 


(b) 


^~~  ^^     Replicate/t 


rans  t er 


-C c O-s 


WWW 


in/out 


WWW 


Figure  2.6 

(a)  SHIFT_ REGISTER  ARCHITECTURE, 

(b)  MAJOR/MINOR -LOOP  ARCHITECTURE 


22 


architectures  (see  Figure  2.6b).   In  this  configuration, 
data  is  stored  in  minor  loops.   When  a  read  function  is 
initiated,  the  data  is  rotated  onto  the  major  loop, 
detected,  and  recycled  back  onto  the  minor  loop  position 
where  it  began.   Access  times  were  improved  greatly  using 
this  architecture,  but  improvement  was  still  needed.   An 
additional  advantage  of  this  configuration  was  in  the  area 
of  chip  production.   Ths  manufacturers  were  now  able  to 
provide  redundancy  in  the  number  of  minor  loops.   The  extra 
loops  that  were  added  provided  a  margin  of  error  in  chip 
defects.   If  one  loop  was  bad,  an  extra  loop  could  take  its 
place.   Typically  manufacturers  provide  up  to  25  additional 
loops  to  compensate  for  any  defects. 

c.   Block  Replicate  Architecture 

The  major-minor  loop  design  improved  accessi- 
bility but  problems  still  existed.   The  fact  that  the  bubble 
domains  had  to  be  recycled  to  their  positions  retarded 
access  time.   The  block  replicate  architecture  solved  this 
problem  (see  Figure  2.7).   This  configuration  involves 
swapping  and  replicating  the  bubble  domains.   When  data  is 
written  into  the  system,  bubbles  on  the  input  track  are 
swapped  with  old  data  on  the  minor  loops.   The  old  data  is 
then  destroyed.   When  reading  the  minor  loop,  data  is 
replicated  onto  the  output  track.   The  data  remains  intact 
in  the  minor  loops.   Swapping  occurs  when  a  current  pulse, 
in  a  conductor  under  the  chevrons,  causes  the  bubble  to 
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jump  from  the  input  track  to  the  storage  loop  and  vice 

versa.   The  swap  pulse  is  essentially  rectangular, 

preserving  the  bubble  without  cutting  it  in  two.   For 

replication,  the  bubble  is  propagated  under  a  large 

element  where  it  is  stretched  out.   As  it  passes  under  a 

hairpin  shaped  conductor  loop  it  is  cut  by  a  current  pulse 

just  as  in  bubble  generation.   The  replicating  current  pulse 

waveshape  has  a  high,  narrow  leading  spike  for  cutting  the 

original  bubble  in  two,  and  a  lower,  wider  trailing  portion 

during  which  the  new  bubble  moves  under  the  output  track. 

This  pulse  lasts  one-quarter  of  a  cycle.   In  this  manner 

data  is  propagated  to  be  read,  yet  retained  in  the  minor 

loops  for  storage  [Reference  4] . 

d.   Odd-Even  Loop  Architecture 

A  variation  upon  the  block  replicate  design 

improves  access  time  even  further.   Due  to  the  properties 

involving  bubble  domain  interaction,  a  domain  can  exist 

only  in  alternate  positions.   This  space  in  between  each 

data  position  means  that  data  can  be  manipulated  only  every 

second  cycle.   A  way  around  this  problem  was  found  in  the 

odd-even  loop  architecture  (see  Figure  2.8).   The  minor 

loops  are  divided  into  even  and  odd  sections.   On  one  cycle 

the  even  bits  are  read  and  on  the  next  cycle  the  odd  bits 

are  read.   The  positions  of  these  bits  are  staggered  and 

they  are  interleaved  on  the  way  to  the  detector.   The  write 

operation  is  similarly  performed  except  no  interleaving  is 

needed  [Reference  6] . 
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As  a  result  of  these  architectural  improvements,  access 
time  has  been  cut  from  2  seconds  (shift  register)  to  40 
milliseconds.   While  this  time  is  1,000  times  slower  than 
ram  memory,  it  is  2  to  4  times  faster  than  either  hard  or 
floppy  disk. 

C.   PRESENT  BUBBLE  MEMORY  STATUS 

The  market  for  bubble  memory  has  never  materialized  as 
anticipated  when  it  was  first  introduced.   Essentially, 
bubble  memory  has  been  playing  catch  up  for  the  past  15 
years.   In  the  late  1960*s  bubble  technology  was  seen  as 
the  answer  to  unwieldy  core  memories  and  slow  disk  systems 
then  in  use.   Research  continued  at  Bell  Labs  as  well  as  at 
IBM,  National  Semiconductor,  Motorola,  and  Texas  Instruments 
Mastering  bubble  technology  was  no  easy  task  however.   As 
the  companies  struggled  to  get  their  product  out  of  the 
labs  and  into  production,  they  neglected  to  develop 
supporting  electronics.   This  circuitry,  notably  bubble 
memory  controllers,  is  essential  to  make  bubble  memories  as 
easy  to  use  as  disks.   This  lapse  alone  cost  the  industry 
two  or  three  years  in  terms  of  market  acceptance.   In 
addition  the  price  of  semiconductor  memories  and  disk 
systems  continued  to  fall.   As  a  result,  bubble  memory  sales 
plummeted  (Reference  7] .   This  lack  of  sales  volume 
resulted  in  the  price  of  a  bubble  system  remaining  very 
high  in  comparison  to  its  competitors.   One  by  one 
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companies  dropped  out  of  the  market,  until  Intel  Corporation 
was  the  lone  producer  in  the  United  States.   At  one  point 
there  was  estimated  to  be  200  engineers  working  on  bubble 
memory  compared  with  50,000  individuals  researching  silicon 
memories.   The  lull  was  broken  in  1979  with  the  advent  of 
Intel's  1  megabit  device.   The  initial  price  was  a  stiff 
$2,500.   Production  costs  have  since  been  reduced 
sufficiently  to  allow  a  $300  current  pricetag.   Although  it 
is  doubtful  if  bubble  memory  will  ever  displace  disk  systems, 
it  has  found  a  growing  segment  in  today's  marketplace.   Its 
solid  state  durability  has  made  it  a  natural  selection  for 
systems  in  harsh  environments.   Bubble  systems  have  also 
found  their  way  into  a  few  personal  computer  systems.   With 
the  coming  of  Intel's  512k  byte  chip  later  this  year  and  a 
2-megabyte  in  1986,  the  market  should  open  even  further. 
Today  bubble  memory  seems  to  have  come  back  from  near 
disaster.   It  is  now  viewed  with  enthusiasm  as  a  young 
technology  with  an  as  yet  unknown  potential.   The  following 
chapters  will  describe  how  a  particular  bubble  memory  system, 
the  Intel  iSBC  254,  can  operate  in  a  microprocessor 
environment . 
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III.   HARDWARE  SYSTEM  DESCRIPTION 

A.  OVERVIEW 

The  major  components  used  in  the  work  described  here 
consist  of  an  iSBC  254  bubble  memory  system,  an  iSBC  86/30B 
single  board  computer,  an  Intellec  single  density  MDS ,  and 
an  iSBC  201  single  density  disk  controller.   The  system 
was  operated  using  the  CP/M-86  operating  system  (version  1.0 
as  modified  in  Reference  15) .   The  following  sections  will 
describe  each  component.   Particular  emphasis  will  be 
placed  on  the  bubble  memory  system. 

B.  iSBC  2  54  BUBBLE  MEMORY  BOARD 

The  iSBC  254  bubble  memory  board  is  a  fully  assembled, 
multibus  compatible,  non-volatile  memory.   The  board  is 
capable  of  utilizing  up  to  four  Intel  7110  bubble  memory 
modules.   The  rotating  field  operates  at  a  frequency  of 
50Khz.   A  permanent  magnet  provides  the  bias  field  of  20 
oersteds.   The  operating  temperature  range  is  between  0  and 
50  degrees  centigrade  with  100  FPM  of  airflow.   The 
iSBC  254  is  compatible  with  16-bit  addressing  for  8  bit 
microprocessors  and  20  bit  addressing  for  16  bit  machines. 
There  are  three  modes  of  data  transfer  available:   polled, 
interrupt,  and  DMA. 
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The  iSBC  254  configuration  used  in  this  work  consisted 
of  two  7110  modules,  their  support  components,  one  controller, 
a  DMA  controller,  and  associated  Multibus  interface  I/O 
circuitry.   This  configuration  has  a  maximum  data  transfer 
rate  of  25K  bytes/sec  with  an  average  access  time  of  48ms. 
A  storage  capacity  of  256K  bytes  of  non-volatile  read/write 
memory  is  available.   The  7220-1  BMC  controller  interfaces 
the  memory  modules  to  the  multibus  circuitry  via  I/O 
buffers.   These  buffers  then  transfer  data,  address,  control, 
and  status  information  to  the  system  bus  and  iSBC  254  board. 
No  special  timing  considerations  or  hardware  modifications 
were  necessary.   The  iSBC  is  fully  compatible  with  any  Intel 
host  computer  on  a  Multibus  system.   No  attempt  will  be  made 
here  to  explain  the  complex  internal  timing  and  operations. 
A  full  explanation  can  be  found  in  Reference  8.   Instead,  a 
brief  outline  will  be  given  on  the  operation  of  each  of  the 
major  board  components. 

The  following  devices  will  be  described  as  to  function 
and  system  interface: 

1.  7110  Bubble  Memory  Module 

2.  7220-1  Bubble  Memory  Controller  (BMC) 

3.  7242  Formatter/Sense  Amplifier  (FSA) 

4.  7230   Current  Pulse  Generator  (CPG) 

5.  7250  Coil  Predriver  (CPD) 

6.  7254  Quad  VMOS  Drive  Transistor 

7.  Power  Fail  Circuitry 
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1 .   Component  Functions 

The  7110  magnetic  bubble  module  is  a  high  density, 
1  megabit  solid  state  memory  chip.   The  MBM  holds  the 
bubble  data  for  storage  and  transfer.   The  architecture  is 
odd-even,  block  replicate.   The  1  megabit  storage  capacity 
is  provided  by  256  loops  of  4,096  bits  each.   When  error 
correcting  is  selected  14  additional  loops  are  incorporated 
for  the  fire  code.   If  error  correcting  is  not  implemented 
272  loops  are  used  for  data.   The  module  itself  is  divided 
into  four  quads.   Each  half  module  consists  of  an  "odd" 
and  "even"  quad.   Odd  and  even  refers  to  the  bit  position 
of  the  stored  data.   A  half  module  consists  of  160  loops. 
Since  only  155  are  required  for  data  and  the  ECC  code,  25 
are  left  for  redundancy.   In  practice  the  module  is  screened 
for  up  to  24  bad  loops  to  allow  the  user  16  extra  bits  if 
error  correcting  is  not  implemented.   Each  quad  has  an  81st 
loop  called  the  bootloop.   This  loop  provides  a  map 
indicating  the  good  and  bad  storage  loops.   The  bootloop  is 
written  during  production  and  normally  requires  no 
modification.   The  bootloop  also  provides  synchronization 
data  used  as  a  reference  for  a  physical  page  address.   The 
data  flow,  as  previously  described  in  chapter  2,  is  typical 
of  the  odd-even  block  replicate  architecture  [Reference  8] . 

The  7220-1  Bubble  Memory  Controller  provides  all  the 
timing  and  control  functions  needed  to  operate  the  system. 
It  is  the  single  point  of  contact  between  the  host  and 
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memory.   The  7220-1  provides  a  suitable  microprocessor 
interface  as  well  as  an  interface  to  the  support  chips  on 
the  iSBC  254  board  [Reference  9].   The  method  of 
communication  with  the  controller  will  be  discussed  later 
in  this  chapter. 

The  7242  Formatter/Sense  Amplifier  accepts  signals 
from  the  bubble  detectors  in  the  MBM.   During  read 
operations,  this  device  buffers  the  signals  and  performs 
formatting  operations.   During  write  operations,  the  7242 
enables  the  current  pulses  of  the  7230  that  causes  the 
bubbles  to  be  generated.   Automatic  error  detection  and 
correction  of  the  data  can  be  performed  by  the  7242.   The 
bootloop  is  automatically  placed  in  the  7242  bootloop 
register  to  serve  as  a  data  map  for  the  system  [Reference  9] . 

The  7230  Current  Pulse  Generator  supplies  the 
pulses  that  produce  the  magnetic  bubbles  and  transfer  them 
into  and  out  of  the  storage  loops  of  the  MBM  [Reference  9] . 

The  7250  and  two  7254' s  supply  the  drive  currents 
for  the  in-place  rotating  magnetic  field  (X  and  Y  coils) 
that  move  the  magnetic  bubbles  within  the  MBM  [Reference  9] . 

The  bubble  memory  is  accessed  by  passing  currents 
of  the  proper  magnitude  and  phase  through  two  coils  within 
the  MBM.   These  currents  must  always  be  of  the  proper 
amplitude  and  phase  or  data  can  be  lost.   It  is  also 
critical  to  avoid  any  transient  pulses  that  may  occur. 
The  purpose  of  the  power— fail  circuitry  is  to  prevent 
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these  transients  and  to  monitor  the  system  voltages. 
Should  power  fail,  the  coil  currents  must  stop  in  the 
proper  phase  [Reference  9] . 

To  better  illustrate  the  interactions  between 
the  various  components,  the  data  flow  within  the  system 
will  now  be  explained  (see  Figure  3.1).   During  the  read 
operation,  bubbles  from  the  storage  loops  are  replicated 
onto  an  output  track  and  then  moved  to  a  detector  within 
the  MBM.   All  movements  and  current  pulses  are  under  the 
control  of  the  7220-1  controller.   The  magnetic  field 
rotation  and  timing  are  also  controlled  by  the  7220-1. 
The  bubble  detector  outputs  a  differential  voltage 
according  to  whether  a  bubble  is  present  or  absent  in  the 
detector.   This  voltage  is  fed  to  the  detector  input  of 
the  Formatter/Sense  Amplifier.   The  data  path  between  the 
7110  MBM  and  the  FSA  consists  of  two  channels  connected 
to  the  two  halves  of  the  MBM.   When  data  is  written,  the 
bit  stream  is  divided  with  half  of  the  data  going  to  each 
side  of  the  MBM.   During  a  read  operation,  data  from  each 
half  of  the  MBM  goes  to  the  corresponding  channel  of  the 
FSA.   In  the  FSA,  the  sense  amplifier  performs  a  sample- 
and-hold  function  on  the  detector  input  data.   The  sense 
amplifier  then  produces  a  digital  one  or  zero.   The 
resulting  data  bit  is  then  paired  with  the  corresponding 
bit  in  the  FSA  bootloop  register.   If  an  incoming  data  bit 
is  found  to  be  from  a  good  loop,  it  is  stored  in  the  FSA 
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FIFO  buffer.   Otherwise  the  data  is  ignored.   This  process 
continues  until  both  channel's  FIFOs  are  filled  with  256 
bits.   Error  detection  and  correction,  if  enabled  by  the 
user,  is  applied  to  each  block  of  256  bits  at  this  point. 
If  error  correction  is  not  enabled, 272  bits  are  used  as 
data.   As  the  data  leaves  the  FSA,  the  bit  patterns  are 
interleaved  and  sent  to  the  7220  BMC.   The  transfer  is  in 
the  form  of  a  serial  bit  stream  via  a  one  line  bidirectional 
data  bus.   In  the  7220  BMC,  the  data  undergoes  a  serial-to- 
parallel  conversion  and  is  assembled  into  bytes  that  are 
buffered  in  the  7220  FIFO.   It  is  from  this  FIFO  that  the 
data  is  written  onto  the  user  interface  [Reference  4] . 
2 .   Communicating  Kith  the  7220-1  BMC 

The  bubble  memory  controller  is  the  single  point 
of  contact  with  the  host  interface.   The  CPU  views  the 
BMC  as  two  input/output  ports  on  the  bus.   When  the  least 
significant  bit  of  the  address  line  is  active  (A0=1) ,  the 
command/status  port  is  selected.   When  the  least 
significant  bit  of  the  address  line  is  inactive,  the  data 
port  is  selected.   For  simplicity  the  BMC  can  be  viewed  as 
a  40  byte  FIFO  buffer  and  6  eight  bit  registers.   The  primary 
purpose  of  the  FIFO  is  to  reconcile  differences  in  timing 
between  the  user  interface  and  FSA  interface.   The  six  8  bit 
registers  internal  to  the  BMC  are  loaded  by  the  user  with 
information  regarding  the  operation  of  the  system.   Loading 
these  registers  before  any  commands  are  sent  is  similar  to 
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passing  parameters  to  a  subroutine  prior  to  execution. 
Hence  the  registers  are  referred  to  as  parametric  registers 
Data  transferred  between  the  7220  and  the  CPU  takes  place 
over  an  8  bit  data  bus.   The  choice  as  to  whether  the  data 
is  destined  for  the  FIFO  or  the  parametric  registers  is 
made  through  the  command/status  port.   In  one  case,  the 
actual  commands  that  cause  some  operation  to  take  place 
(read,  write,  etc.),  are  signified  by  a  command  byte  with 
bit  4  set  to  1  and  the  low  order  nibble  containing  one  of 
16  command  codes.   If  bit  4  is  zero,  the  low  order  nibble 
is  taken  to  signify  a  parametric  register  pointer.   For 
user  convenience  the  7220-1  contains  a  register  address 
counter  (RAC) .   The  RAC  is  self  incrementing  with  each 
subsequent  byte  of  data  transferred  on  the  data  port.   This 
feature  allows  the  user,  after  addressing  the  first 
parametric  register,  to  load  the  register  values 
sequentially  without  addressing  each  one.   After  the  last 
register  has  been  loaded  the  RAC  points  to  the  7220-1  FIFO 
for  subsequent  data  transfers.   The  parametric  registers 
are  listed  in  Figure  3.2. 

All  commands  given  to  the  BMC  are  issued  through 
the  command  status  port  to  the  command  register.   The 
sixteen  commands  available  to  the  bubble  memory  are  listed 
along  with  the  hex  code. 
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Write  Bootloop  Register  Masked  Olh 

Initialize  llh 

Read  Bubble  Data  12h 

Write  Bubble  Data  13h 

Read  Seek  14h 

Read  Bootloop  Register  15h 

Write  Bootloop  Register  16h 

Write  Bootloop  17h 

Read  FSA  Status  18h 

Abort  19h 

Write  Seek  lAh 

Read  Bootloop  lBh 

Read  Corrected  Data  ICh 

Reset  FIFO  lDh 

MBM  Purge  lEh 

Software  Reset  lFh 

Read,  write,  abort,  and  initialize  are  described  in  chapter 

4.   The  remainder  of  the  commands  are  seldom  used  in  normal 

operation.   They  are  described  in  detail  in  Reference  8. 

Addressing  flexibility  is  one  of  the  features  of  the 
iSBC  254  bubble  memory.   In  the  work  described  here, two 
modules  were  available  for  use.   Using  the  addressing 
combinations  available,  the  data  could  be  organized  into 
2,048  pages  of  128  bytes  each  or  4,096  pages  of  64  bytes 
each.   The  configuration  is  determined  at  run  time  using 
the  block  length  register  and  address  register.   Figure  3.3 
lists  the  various  combinations  available  for  up  to  four 
modules . 

The  Block  Length  Register  (BLR)  is  a  16  bit  value 
divided  into  two  fields:   The  "terminal  count"  field  and 
the  "channel"  field  (nfc)  (see  Figure  3.4a).   The  terminal 
count  field  ranges  over  the  eleven  least  significant  bits 
and  defines  the  total  number  of  pages  requested  for  a  read 
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or  write  operation.   With  the  eleven  bits  it  is  possible 
to  request  from  1  to  2,048  pages.   A  field  of  all  zeros 
indicates  a  2,048  page  transfer.   The  channel  field 
indicates  the  width  of  the  page  by  specifying  the  number 
of  channels  to  be  used.   A  page  width  of  64,  128,  256, 
or  512  bytes  can  be  selected  (see  Figure  3.3).   The  address 
register  is  another  16  bit  value  containing  two  fields 
(see  Figure  3.4b).   The  11  bit  starting  address  field 
specifies  the  page  address  at  which  the  data  transfer  begins. 
If  more  than  one  page  is  transferred  the  address  field  is 
automatically  incremented.   The  second  field  in  the  address 
register,  the  MBM  select  field,  consists  of  bits  11,  12,  13, 
and  14  (bit  15  is  not  used) .   These  four  bits  select  the 
particular  MBMs  to  be  used  in  a  data  transfer.   In  conjunction 
with  the  channel  field  of  the  block  length  register,  the  MBM 
select  field  controls  the  serial  selection  of  bubble  modules 
or  groups  of  modules  operated  in  parallel. 

The  final  parametric  register  is  the  enable  register. 
While  the  address  and  block  length  registers  define  the 
system  configuration,  the  enable  register  defines  the  mode 
of  operation,  interrupt  conditions,  and  error  correction 
level  (see  Figure  3.5a).   The  system  is  capable  of  three 
modes  of  transfer,  polled,  interrupt,  and  DMA.   This  work 
utilized  the  polled  method  which  will  be  explained  in 
chapter  4.   A  thorough  description  of  the  other  modes  is 
outlined  in  Reference  8.   The  error  correction  feature  can 
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be  implemented  on  three  levels.   Level  1  is  the  minimum 
level  of  error  correction.   This  level  is  used  only  when 
the  host  is  concerned  with  maintaining  bubble  integrity. 
If  an  error  is  detected,  a  read  corrected  data  command  is 
automatically  given  to  the  FSA.   If  the  error  is 
correctable,  the  data  transfer  continues  normally.   If  the 
error  is  not  correctable  or  a  timing  error  exists,  the 
data  transfer  will  be  terminated  at  the  error  page  address. 
This  level  is  well  suited  to  a  go/no-go  type  of  data 
transfer,  and  was  chosen  for  the  work  in  this  paper.   Level 
2  is  identical  to  1  with  the  exception  that  upon  an 
uncorrectable  error  no  erroneous  data  is  transferred  to  the 
BMC  FIFO.   Level  3  is  the  most  intensive  means  of  error 
handling.   Under  this  setting  the  data  transfer  is  halted 
if  any  error  is  detected.   It  is  by  far  the  most  demanding 
in  terms  of  software  requirements  [Reference  9] . 

The  final  register  to  be  discussed  contains  the 
status  of  the  data  transfer.   Figure  3.5b  illustrates  the 
bit  designations  in  the  status  register.   As  will  be 
described  in  chapter  4,  this  register  is  extremely  important 
when  using  the  polled  method  of  data  transfer.   The  status 
register  contains  information  concerning  error  conditions, 
command  completion  (or  termination),  and  the  BMC ' s 
readiness  to  accept  new  commands  [Reference  9] . 
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3.   Preparing  the  iSBC  254  Board  For  Operation 

After  the  board  was  visually  inspected  for  flaws, 

the  following  jumpers  were  connected: 

E79  -  E80 

E67  -  E68 

E46  -  E45 

E30  -  E29 

E27  -  E28 

E63  -  E64 

These  jumpers  established  the  base  address  of  OOh,  an 

acknowledge  delay  period  of  four  clock  cycles,  serial  bus 

priority,  and  8  bit  I/O  addressing  [Reference  8] . 

The  iSBC  254  requires  +5VDC  at  2 . 4A  and  12VDC  at 

0.8A.   These  power  requirements  are  fully  compatible  with 

the  available  multibus  power  supplies.   No  hardware 

modifications  are  required. 

C.   DEVELOPMENT  SYSTEM 

The  hardware  used  in  the  development  of  the  software, 

centered  upon  the  Intellec  Microcomputer  Development  System. 

The  Intellec  MDS  is  a  coordinated,  complete  computer  system 

designed  around  the  Intel  8080  microprocessor.   The  system 

modules  are  contained  in  an  eighteen  card  chassis  which 

features  Intel's  Multibus  architecture.   The  8080 

microprocessor  was  removed  along  with  its  associated  memory 

modules.   The  86/30B  was  placed  in  an  odd  slot  to  serve  as 

bus  master.   No  additional  memory  modules  were  required  as 

the  86/30  has  128K  of  onboard  memory.   The  iSBC  201  disk 

controller  serviced  a  dual  single  density  disk  drive 

[Reference  10] . 
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The  iSBC  86/30  is  a  single  board  microcomputer  based  on 
the  16  bit  Intel  8086  microprocessor.   Included  on  the  board 
are  128K  of  dynamic  RAM,  three  programmable  parallel  I/O 
ports,  programmable  timers,  priority  interrupt  control, 
serial  communications  interface,  and  Multibus  interface 
logic . 

The  CP/M-86  operating  system  is  a  product  of  Digital 
Research  and  is  produced  for  use  with  the  8086  microprocessor 
CP/M-86  provides  a  wide  variety  of  utility  built-in  commands 
and  transient  programs.   In  addition  the  user  can  produce 
and  execute  additional  transient  programs.   CP/M-86 
provide  useful  programs  for  software  development.   DDT86 
is  a  dynamic  programming  debugger  that  proved  invaluable 
for  program  error  correcting.   This  operating  system  also 
provide  facilities  for  writing  and  editing  programs.   ED  is 
a  very  primitive  text  editor  that  proved  to  be  adequate  for 
writing  the  programs  used  in  this  work  [Reference  11,  12]. 
The  programming  language  used  was  8086  assembly  language  due 
to  the  basic  register,  data,  and  I/O  port  manipulations  that 
were  required  to  make  the  hardware  operate.   All  programs 
were  written  and  assembled  using  this  system.   No  outside 
resources  were  required.   A  printer  was  available  for  hard 
copy  transfers . 
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IV.   BASIC  SOFTWARE  DRIVER  DEVELOPMENT 

A.   DRIVER  ORGANIZATION 

The  first  step  in  developing  a  working  bubble  memory 
system  is  the  development  of  a  basic  I/O  driver  and 
operationally  testing  the  program  for  correctness.   This 
task  was  accomplished  using  a  menu  driven  program  with 
modular  structure  and  expansion  capabilities.   The 
completed  program,  BUB.A86,  is  listed  as  Appendix  A. 

At  the  outset  of  this  project,  a  decision  was  made  to 
use  the  polled  method  of  communication.   This  method  was 
chosen  both  for  its  simplicity  and  reliability.   The  polled 
I/O  mode  is  the  most  simple  to  implement  since  no  special 
or  external  hardware  is  required  to  perform  data  transfers. 
In  the  polled  I/O  mode,  the  software  must  determine  when  to 
transfer  data  to  or  from  the  FIFO  by  continually  polling 
a  status  bit  in  the  BMC ■ s  Status  Register.   This  status 
bit  indicates  the  presence  or  absence  of  data  in  the  FIFO 
on  a  byte  by  byte  basis.   The  polled  method  places  the  most 
demand  on  the  host  system's  processing  time  since  the 
software  continuously  must  monitor  the  Status  Register 
[Reference  9] . 

The  driver  program's  main  menu  includes  the  following 
features : 
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1.  Abort 

2.  Send  Any  Command 

5.   Read  Status  Register 

4.   Format  Bubble  Memory 
The  sequential  development  of  these  features  aided  in  the 
understanding  of  the  operation  of  the  memory  system.   In 
addition  this  method  of  development  honed  the  programming 
skills  necessary  for  subsequent  developments.   Each 
subroutine  supported  succeeding  more  complex  routines. 

B.   FUNCTION  DESCRIPTION 
1 .   Abort  Function 

The  abort  routine  was  developed  initially  in 
accordance  with  the  manufacturers  recommendations.   When 
powering  the  iSBC  254  Bubble  Memory  Board  up  for  the  first 
time,  it  is  imperative  that  the  board  be  aborted  to  insure 
proper  operation.   When  power  is  first  applied  to  the 
iSBC  254,  a  power  fail  reset  circuit  provides  a  delay  (at 
least  2ms)  to  allow  the  7220-1  bubble  memory  controller  (BMC) 
to  properly  power-up.   An  abort  command  must  then  be  issued 
to  the  BMC  in  order  to  reset  the  system  into  a  known  state. 
After  both  power  supplies  have  reached  95  percent  of  their 
nominal  values,  a  50ms  delay  is  needed  before  the  abort 
command  is  issued  to  the  BMC.   This  delay  could  be 
implemented  in  software.   It  was  decided  however  that  this 
interval  would  be  more  than  taken  care  of  by  the  amount  of 
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time  necessary  to  power-up  the  system,  load  the  operating 
system,  and  implement  the  program  [Reference  9] . 

The  abort  subroutine  is  a  simple  example  of  a  non 
data  transfer  command  sequence  (see  Figure  4.1).   No 
parametric  registers  have  to  be  written  prior  to  issuing 
the  command.   After  the  command  has  been  sent,  the  status 
register  is  checked  to  see  if  the  command  has  been  accepted 
This  acceptance  is  signified  by  the  setting  of  bit  7  in 
the  status  register  (busy  bit) .   Once  the  command  has 
been  accepted,  the  status  register  is  checked  to  see  if 
the  operation  is  completed  (bit  6  in  the  status  register) 
or  if  it  has  failed  (bit  5  in  the  status  register) .   If  the 
operation  fails  or  the  timeout  counter  terminates,  the 
routine  returns  an  error  message.   If  the  operation  is 
successful,  a  completion  message  is  sent  and  the  routine 
returns  to  the  main  program.   Due  to  the  necessity  of 
aborting  the  bubble  memory,  this  routine  is  performed  in 
software  automatically  each  time  the  bubble  memory  driver 
is  initiated.   It  may  also  be  selected  for  execution  from 
the  menu. 

2  .   Send  Any  Command  Function 

The  second  function  in  the  bubble  control  driver  is 
one  in  which  commands  can  be  sent  to  the  bubble  memory 
controller.   Each  command  developed  has  its  own  calling 
routine  which  then  executes  the  necessary  subroutines.   In 
the  work  described  here  it  has  not  been  necessary  to 
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develop  all  of  the  bubble  commands.   Abort,  initialize, 
fifo  reset,  read,  and  write  were  the  ones  needed  to 
develop  the  driver.   After  successfully  aborting  the 
bubble  memory,  it  is  necessary  to  initialize  it  for  further 
operation.   This  command  prepares  the  bubble  system  for 
subsequent  operations  and  is  used  when  the  bubble  system  is 
powered-up.   The  parametric  registers  must  be  loaded  prior 
to  executing  this  command.   The  following  information  is 
necessary  for  successful  initialization: 

The  channel  field  in  the  block  length  register  must 
be  set  to  0001  to  arrange  all  bubbles  in  the  system 
in  a  serial  configuration.   This  code  allows  the 
individual  bootloops  to  be  read  from  each  bubble  and 
then  written  to  the  bootloop  registers  of  the 
corresponding  FSA  channels. 

The  MBM  select  field  in  the  address  register  must 
select  the  last  bubble  in  the  system  to  inform  the 
BMC  of  the  number  of  bubble  modules  in  the  configuration. 
In  the  case  of  the  iSBC  254  board  that  was  used  in  this 
work  there  are  two  bubble  modules.   Thus  the  code  of 
0001  was  entered  to  satisfy  this  requirement. 

The  bits  in  the  enable  register  selecting  error 
corrections  must  be  set  in  accordance  with  how  subsequent 
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read  and  write  operations  are  to  be  performed.   The 
bubble  system  must  be  initialized  each  time  error 
correction  is  activated  or  deactivated.   Merely  changing 
error  correction  levels  does  not  require 
re- initialization. 

The  bubble  system  can  be  initialized  to  any  address 

within  the  module. 
When  an  initialization  command  is  received,  all  internal 
registers  within  the  BMC  are  cleared  and  the  FIFO  is  reset. 
The  BMC  then  reads  the  bootloop  from  each  bubble  and  writes 
the  corresponding  bootloop  information  into  the  bootloop 
registers.   The  bubble  is  left  positioned  according  to  the 
value  in  the  address  register  [Reference  9] . 

The  subroutine  used  to  initialize  the  bubble  system 
follows  the  same  format  as  the  abort  routine  with  the 
exception  of  writing  the  parametric  registers.   Since  the 
values  to  be  sent  to  the  registers  are  constant,  they  are 
stored  in  a  table  in  memory.   A  routine  then  moves  these 
values  to  reserved  locations  for  the  parametric  register 
values.   Once  these  parameters  are  located  properly,  they 
are  then  loaded  into  the  appropriate  register.   After  the 
initialize  command  is  issued,  the  polled  method  then 
continually  reads  the  status  register  to  insure  that  the 
command  has  been  accepted  and  completed.   The  applicable 
messages  are  printed  after  the  operation. 


51 


The  read  and  write  command  routines  were  developed 
after  the  board  was  verified  to  be  initializing  properly. 
The  read  bubble  data  command  causes  data  to  be  read  from  the 
MBMs  and  into  the  BMC  * s  FIFO.   Immediately  before  the  read 
command  is  issued  the  parametric  registers  have  to  be 
properly  loaded.   Since  the  future  plan  for  the  bubble 
system  was  to  incorporate  it  into  a  CPM-86  operating  system, 
the  bubble  memory  was  configured  to  read  128  byte  blocks. 
This  arrangement  is  accomplished  by  loading  the  following 
code  into  the  parametric  registers: 

The  channel  field  (4  most  significant  bits  in  the 
block  length  register)  contains  0010.   This  code 
tells  the  BMC  that  both  bubble  modules  are  to  operate 
in  parallel.   Two  modules  in  parallel  contain  2,048  128 
byte  pages . 

The  block  length  was  set  to  one  for  a  one  page  transfer. 

The  enable  register  was  set  for  error  correction  level 
one . 

Bits  6,  5,  4,  3  of  the  address  register's  most 
significant  byte  were  set  to  0000.   This  code  addressed 
the  first  two  modules  in  the  bubble  memory  system. 
Although  the  configuration  used  here  has  only  two  bubble 
modules,  the  BMC  has  the  capability  of  controlling  eight. 
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For  this  reason  it  is  necessary  to  specify  the  correct 
configuration.   The  page  address  can  be  any  value  up  to 
2,047.   As  a  result,  this  routine  can  write  to  any  page 
in  the  bubble  memory  system. 

The  read  routine  is  somewhat  more  complex  than  a 
non-data  transfer  command  (see  Figure  4.2).   Since  the 
register  values  can  vary,  a  method  was  devised  to  enter  the 
desired  numbers  from  the  console.   When  the  read  command  is 
selected  from  the  menu,  a  series  of  messages  will  prompt 
the  user  to  enter  the  values  of  the  various  registers. 
These  values  are  to  be  entered  in  decimal  form.   A 
conversion  routine  changes  the  numbers  to  hex  code  and  stores 
them  in  the  proper  memory  locations.   The  registers  are  then 
loaded  and  the  read  command  is  issued.   Although  the  routine 
is  set  up  to  read  one  128  byte  page  any  appropriate  numbers 
can  be  entered  depending  upon  how  the  read  command  subroutine 
is  tailored.   In  this  case  block  length  is  entered  as  0001, 
number  of  channels  is  2,  enable  register  is  32  (20h-level  1 
error  correcting),  the  page  address  can  vary  from  0000-2047 
and  the  bubble  number  is  entered  as  0000.   Level  one  error 
correcting  was  chosen  to  facilitate  data  transfer  in  the 
event  of  a  correctable  error.   Only  a  non-correctable  error 
would  terminate  the  operation  [Reference  8,  9]. 

Once  the  read  command  is  issued,  the  status 
register  must  be  checked  for  command  acceptance.   When  the 
command  is  accepted,  bit  0  of  the  status  register  is  viewed 
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to  determine  if  the  FIFO  is  ready  to  accept  data.   If  the 
system  is  ready,  data  is  read  one  byte  at  a  time.   This 
cycle  is  repeated  for  all  128  bytes.   If  during  the  transfer 
the  time-out  counters  run  out  or  an  uncorrectable  error 
occurs,  the  operation  will  terminate.   The  status  register 
will  signify  operation  complete  (bit  6)  when  the  proper 
number  of  bytes  have  been  transferred.   This  number  is 
determined  from  the  parametric  register  values  described 
above . 

The  write  bubble  data  command  causes  data  to  be 
written  into  the  bubble  memory  modules.   A  write  data 
transfer  does  not  occur  until  at  least  two  bytes  of  data 
has  been  written  into  the  FIFO.   As  in  the  read  routine  the 
parametric  registers  have  to  be  written  with  the  appropriate 
data.   In  this  case,  the  write  routine  loads  128  bytes  into 
memory.   The  register  parameters  are  identical  to  those  in 
the  read  procedure.   The  mechanics  of  the  read  and  write 
subroutines  are  virtually  identical. 

Although  most  of  the  commands  available  to  the  bubble 
memory  are  not  developed  in  this  controller,  those  described 
above  are  the  most  commonly  used.   Essentially  the  previously 
defined  commands  are  all  that  is  needed  to  produce  an 
effective  driver  routine  [Reference  4] .   Provisions  have  been 
made  in  this  program  for  expansion.   Any  additional  command 
routines  can  be  inserted  with  a  minimum  of  programming 
difficulty . 
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3.  Read  Status  Register  Function 

The  third  function  in  the  main  program  displays 
the  contents  of  the  status  register.   This  feature  provides 
the  means  of  examining  the  individual  bits  of  the  register 
as  they  are  displayed  in  binary  form.   The  read  and  write 
routine  also  use  this  function  when  returning  to  the  main 
program.   This  feature  is  an  excellent  diagnostic  tool  if 
problems  occur  in  program  execution.   This  routine  converts 
the  register  bits  into  ascii  l's  and  O's.   These  characters 
are  then  displayed  in  a  message  format. 

4 .  Format  Function 

The  last  function  is  used  to  format  the  bubble  memory 
to  be  used  with  the  CPM-86  operating  system.   Using  the 
existing  write  routine,  format  loads  each  bubble  byte  with 
e5h.   This  code  signifies  deleted  information  when  operating 
under  CPM.   It  is  essential  when  the  bubble  system  is  used 
as  a  "disk"  resource. 

C.   PROBLEMS  ENCOUNTERED 

The  hardware  performed  in  a  flawless  manner.   Everything 
functioned  as  expected.   The  only  problems  encountered  at 
this  juncture  originated  in  software.   They  were  relatively 
minor,  and  with  the  aid  of  DDT86  the  difficulties  were 
quickly  resolved.   The  source  of  all  error  could  be 
attributed  to  programmer  inexperience  regarding  8086  assembly 
language  programming. 


56 


V.   INCORPORATION  OF  THE  BUBBLE  MEMORY  AS  A  DISK  RESOURCE 

A.   CP/M-86  STRUCTURE 

The  CP/M-86  structure  consists  of  three  parts:   The 
console  command  processor  (CCP) ,  the  basic  disk  operating 
system  (BDOS) ,  and  the  basic  input-output  system  (BIOS) . 
The  CCP  interprets  commands  entered  by  the  user  and  issues 
responses.   This  portion  of  the  system  examines  command 
lines  typed  by  the  user,  performs  some  simple  validation, 
and  calls  the  appropriate  BDOS  and  BIOS  functions.   The  BDOS 
contains  the  various  utility  routines  for  managing  disks. 
It  makes  disk  file  management  transparent  to  the  user.   Disk 
files  are  often  widely  scattered  in  small  blocks  throughout 
the  storage  device.   BDOS  manages  these  blocks,  dynamically 
allocating  and  releasing  storage  as  necessary.   The  BIOS 
contains  the  various  drivers  that  send  data  to  and  from  the 
devices,  and  it  receives  status  information  about  the  success 
or  failure  of  I/O  operations.   The  CCP  and  BDOS  occupy 
approximately  10k  bytes  of  memory.   These  portions  are 
provided  on  the  distribution  disk  as  CPM.H86.   The  BIOS  is 
modifiable  by  the  user  and  occupies  a  variable  amount  of 
memory.   A  skeletal  BIOS  is  provided  by  Digital  Research  for 
operation  with  disk  peripherals  [Reference  11] .   The  next 
section  deals  with  the  modification  of  this  BIOS  to 
accept  the  iSBC  254  Bubble  Memory  as  a  "disk." 
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B.   BIOS  MODIFICATION 

The  CCP  and  BDOS  communicate  with  physical  devices  via 
a  well-defined  interface  in  the  BIOS.   This  interface  is  a 
set  of  call  and  return  parameters  for  the  specific  functions 
used.   The  BIOS  modified  for  bubble  usage  was  based  on  the 
one  outlined  in  Reference  13.   That  BIOS  was  modified  to 
operate  an  iSBC  201  disk  controller  vice  an  iSBC  204  as 
provided  in  the  skeletal  BIOS.   The  structure  of  this 
modification  was  deemed  adequate  for  the  needs  of  the  work 
presented  here.   Since  the  crux  of  this  work  is  to  operate 
the  Bubble  Memory  as  a  "disk"  resource,  no  major 
modifications  in  structure  were  attempted. 

The  first  step  in  the  BIOS  modification  was  to  modify 
the  disk  parameter  table.  This  table  lists  the  specified 
device  characteristics. 

The  CP/M  operating  systems  are  designed  to  utilize  a 
table-driven  specification  for  the  physical  characteristics 
of  each  disk  device.   The  modification  of  this  table  is 
essential  for  the  user  to  add  devices  to  the  system.   The 
disk  definition  table  is  generated  using  the  following 
parameters:   Logical  device  number,  first  and  last  sector 
number  on  each  track,  optional  skew  factor,  blocksize,  disk 
capacity,  the  number  of  directory  entries,  the  number  of 
checked  entries,  and  number  of  tracks  to  reserve  for  the 
operating  system.   The  utility  program  GENDEF  will  generate 
the  disk  parameter  tables  and  the  necessary  scratch  pad  and 
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buffer  area  needed  by  the  operating  system  for  device 
communication.   GENDEF  uses  a  file  labeled  [filename] . def 
as  an  input  for  execution.   This  input  file  contains  the 
disk  parameters  listed  above.   GENDEF  produces  a  file 
labeled  [filename] . lib  to  be  used  with  an  ASM86  include 
statement  in  the  system  BIOS. 

The  disk  definition  parameters  used  in  the  BIOS  of 
reference  13  were  used  for  the  Bubble  Memory  BIOS.   The 
number  of  disks  was  changed  to  three  and  the  characteristics 
of  the  bubble  "disk"  were  added.   The  iSBC  254  system 
readily  adapted  to  the  CP/M  environment.   With  the 
exception  of  the  skew  factor  no  parameters  needed  to  be 
changed  from  the  standard  disk  parameters.   The  skew  factor 
was  entered  as  zero  due  to  the  fact  that  there  is  no 
latency  time  applicable  to  the  bubble  memory.   In  a 
sequential  access  the  bubble  pages  will  not  rotate  as  a  disk 
does.   The  bubble  memory  was  set  as  disk  number  2.   The 
first  and  last  sectors  were  1  and  26  respectively.   The 
block  size  was  defined  as  1024  with  disk  sizes  equal  to  243K. 
The  bubble  has  64  directory  entries  and  checked  directory 
entries.   There  are  two  reserved  tracks.   The  object  file 
for  the  GENDEF  command  was  named  SINGLES. DEF.   GENDEF  then 
produced  the  file  labeled  SINGLES. LIB.   A  listing  of  these 
two  files  can  be  found  in  Appendices  B  and  C. 

The  next  step  involved  the  actual  modification  of  the 
BIOS.   The  name  chosen  for  the  bubble  BIOS  was  BUBBIOS  and 
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will  be  referred  to  as  such.   A  complete  listing  of 
BUBBIOS.A86  is  in  Appendix  D.   Since  the  iSBC  254  must  be 
aborted  and  initialized  prior  to  operation,  a  suitable 
place  for  insertion  into  the  BIOS  had  to  be  found.   It  was 
decided  to  place  these  subroutine  calls  in  the  INIT 
subroutine.   They  were  located  in  the  "not  loader  bios" 
portion  of  this  subroutine.   This  location  was  chosen  to 
insure  that  the  code  and  data  segments  would  be  properly 
initialized  prior  to  calling  the  bubble  subroutines. 
SELDSK  was  the  next  subroutine  modified.   The  number  of 
disks  needed  to  be  changed  to  3  vice  2.   The  subroutine 
HOME  was  modified 'such  that  after  the  track  was  set  to  zero, 
a  comparison  was  made  to  determine  if  the  bubble  had  been 
chosen.   If  the  bubble  memory  was  selected,  a  jump  was 
inserted  to  skip  the  disk  device  operations  and  return  from 
the  routine.   The  read  and  write  routines  were  modified  in 
a  similar  fashion.   Since  the  iSBC  254  uses  completely 
different  routines  then  a  disk  device,  both  READ  and  WRITE 
make  a  comparison  and  jump  to  the  appropriate  bubble  memory 
routines . 

After  the  existing  BIOS  routines  were  modified,  new 
routines  for  the  bubble  memory  had  to  be  added  to  the 
existing  code.   The  following  bubble  subroutines  are 
utilized  in  BUBBIOS:   bubrd  (bubble  read),  bubwrt  (bubble 
write) ,  abort  (abort  the  bubble) ,  wtreg  (load  the  parametric 
registers)  ,  and  initb  (initialize  the  bubble).  These  routines 
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were  all  developed  in  the  Bubble  Memory  Driver  delineated 
in  chapter  4.   No  major  modifications  were  necessary  in  the 
structure . 

A  problem  did  exist  due  to  the  fact  that  track  and 
sector  as  supplied  by  the  operating  system  did  not  translate 
into  bubble  memory  page  number.   As  a  result  a  simple 
algorithm  had  to  be  implemented  in  the  subroutine  code. 
It  was  mentioned  earlier  that  the  bubble  system  would  be 
configured  to  operate  with  the  two  modules  in  parallel.   The 
result  is  a  data  organization  of  2,048  pages  of  128  bytes. 
Since  CP/M  operating  system  defines  a  sector  as  128  bytes, 
this  translates  to  a  page  in  bubble  memory.   CP/M  generates 
the  sector  and  track  values  for  each  device  access.   Since 
there  are  26  sector  per  track,  the  page  address  for  the 
bubble  memory  can  be  determined  by  multiplying  the  track 
value  by  26  and  adding  the  sector  value.   This  simple 
algorithm  requires  6  lines  of  code  and  is  inserted  prior  to 
calling  wtreg  in  the  bubble  read  and  write  subroutines. 
Another  relatively  minor  modification  involved  returning  to 
the  operating  system  with  "1"  or  "0"  values  in  the  al  register 
If  an  error  occurs  in  the  subroutines,  a  1  is  to  be  returned. 
This  action  causes  an  error  message  to  be  transmitted  by 
the  system.   As  a  result,  the  bubble  routines  were  modified 
to  return  the  appropriate  values. 
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C.   PROBLEMS  ENCOUNTERED  AND  PERFORMANCE  EVALUATION 
1 .   Problems  in  Implementation 

A  major  difficulty  resulted  because  of  confusion  in 
properly  setting  the  si  pointer  register.   During  a  write 
operation,  the  data  segment  is  equated  to  the  dma  segment 
supplied  by  the  operating  system.   The  problem  arose  when 
the  si  pointer  was  set  to  the  dma  address  after  the  data 
segment  value  was  modified.   The  values  for  the  dma  address 
and  segment  are  stored  in  the  initial  data  segment.   When 
the  data  segment  was  equated  to  the  dma  segment,  the  label 
of  dma  address  then  pointed  to  an  incorrect  value.   This  error 
resulted  in  an  incorrect  memory  location  when  writing  data 
to  the  bubble  memory.   The  problem  was  resolved  by  setting 
the  si  pointer  prior  to  changing  the  data  segment  value. 
After  BUBBIOS  was  transfering  data  properly,  the 
data  transfer  time  was  observed  to  be  much  slower  than  disk 
transfers.   Since  bubble  memory  is  appreciably  faster  than 
floppy  disks,  an  examination  of  the  code  for  inefficiency 
was  conducted.   The  problem  was  found  to  be  in  the  read  and 
write  routines.   At  the  beginning  of  these  routines  the 
bubble  was  initialized.   Since  CP/M  reads  and  writes  a  128 
byte  sector  at  a  time,  this  condition  resulted  in  extremely 
slow  multiple  page  transfers.   The  overhead  for  the 
initialization  process  was  too  great  for  efficient  operation. 
After  researching  the  operating  manuals,  it  was  determined 
that  the  bubble  did  not  need  to  be  initialized  for  each 
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page  transferred.   The  code  was  then  changed  for  a  single 

initialization  in  the  INIT  subroutine  as  described  in  the 

previous  section.   The  bubble  performance  improved 

dramatically  and  will  be  outlined  in  the  following  section. 

2 .   Performance  Evaluation 

The  CP/M-86  utility  programs  ED,  ASM- 86,  and  PIP 

were  used  to  evaluate  the  bubble  memory  performance.   ED.CMD 

is  an  object-oriented  editor  for  files.   The  ED  program  and 

target  files  of  17K  and  25K  bytes  were  loaded  to  both  an 

iSBC  254  "disk"  and  iSBC  201  disk.   Using  the  resident  ED 

program  on  each  device,  the  target  files  were  written  and 

read.   The  results  are  summarized  below. 

File  Size  (Bytes)      iSBC-254  (Sec)      iSBC  201  (Sec) 

Read  Write         Read  Write 
17K  4.8   4.8  12.3   15.9 

25K  6.7   4.9  15.2   19.2 

Three  files  were  used  in  the  tests  with  the  PIP 

command.   The  target  files  were  of  6K,  17K,  and  60K  bytes 

in  size.   The  target  files  and  the  PIP.CMD  file  were 

resident  on  each  device.   Each  file  transfer  used  the  resident 

PIP  program.   The  results  are  summarized  below. 

File  Size  (Bytes)      iSBC  254  (Sec)      iSBC  201  (Sec) 


6K 

8 

3 

17 

.6 

17K 

21 

5 

38 

,1 

60K 

44 

9 

62 

5 

The  final  test  utilized  the  ASM86  utility  program. 
A  17K  byte  file  was  assembled  using  same-device  resident 
copies  of  ASM86,  the  target  file  and  all  of  the  ASM86 
output  files.   The  results  follow: 
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File  Size  (Bytes)      iSBC  254  (Sec)      iSBC  201  (Sec) 
17k  63.6  143 

From  the  test  results  it  can  be  seen  that  the  bubble 
memory  offers  a  significant  advantage  in  data  transfer  rates 
Overall  the  bubble  was  approximately  50  percent  faster  than 
the  floppy  disk.   The  more  I/O  intensive  the  program  is, 
the  greater  the  iSBC  254  performance  advantage  becomes  over 
the  iSBC  201.   The  major  limiting  factor  in  using  the 
bubble  system  was  in  the  area  of  transportability. 
Although  you  can  remove  the  iSBC  board,  all  power  must  be 
shut  down.   The  floppy  disk  system  has  an  advantage  due 
to  the  fact  that  disks  can  be  changed  without  power 
interruption.   Since  the  bubble  modules  cannot  be  easily 
interchanged,  the  memory  capacity  is  limited.   The  disk 
system  essentially  has  infinite  memory  due  to  the 
interchangeabil ity . 
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VI.   CONCLUSIONS 

A.  IMPLEMENTATION  SUMMARY 

All  the  objectives  set  for  this  thesis  were  achieved. 
The  iSBC  254  bubble  memory  system  was  successfully  implemented 
and  evaluated  as  a  system  resource.   A  driver  routine  was 
demonstrated  and  tested  using  a  conventional  microprocessor 
operating  system  (CP/M-86)  and  a  commercially  available 
microprocessor  (Intel  8086) .   This  implementation  was 
accomplished  in  such  a  manner  that  the  bubble  system  appears 
as  a  disk  resource.   This  fact  allows  the  user  to  exercise 
the  bubble  system  with  no  special  procedural  requirements. 

The  success  of  this  implementation  establishes  the 
applicability  of  the  bubble  memory  in  a  number  of 
environments.   As  a  disk  resource,  the  iSBC  254  can  now  be 
interfaced  with  other  disk  systems  as  a  shared  resource 
within  the  CP/M-86  operating  system.   The  demonstrated 
interface  with  a  typical  host  system  suggests  the 
compatibility  of  bubble  memory  with  a  wide  variety  of 
similar  microprocessor  systems. 

B.  FUTURE  DEVELOPMENT  AND  IMPROVEMENT 

The  iSBC  254  system  has  intriguing  features  not  employed 
in  this  thesis.   The  system's  DMA  capability  can  be 
investigated  in  future  efforts.   This  capability  requires 
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additional  hardware,  but  offers  an  improved  data  transfer 
efficiency.   If  a  host  system  cannot  tolerate  the  software 
requirements  of  other  modes  of  transfer,  DMA  may  prove  to 
be  the  ideal  solution. 

The  interrupt  driven  data  transfer  mode  requires  less 
processor  overhead  than  the  polled  method  used  here.   Since 
the  interrupts  must  be  hardwired,  some  hardware  modifications 
are  required.   If  the  interrupt  routines  are  efficient 
however,  the  processor  can  be  freed  to  perform  additional 
tasks . 

Another  improvement  for  the  future  would  be  the 
development  of  Boot  Rom  and  Loader  routines  using  the 
bubble  memory.   This  additional  software  would  free  the 
host  system  from  any  dependency  on  conventional  disk 
resources . 

C.   POSSIBLE  APPLICATIONS 

It  is  apparent  from  this  implementation  that  a  bubble 
memory  "disk"  is  superior  to  conventional  floppy  disk  drives 
in  the  area  of  data  transfer  rates.   Their  solid  state 
construction  and  environmental  tolerance  add  to  the  bubble 
system's  advantages.   This  type  of  memory  system  can  operate 
in  100  percent  humidity,  withstand  shocks  of  up  to  a 
200G  force,  and  withstand  temperatures  in  excess  of  65 
degrees  centigrade.   The  major  drawbacks  have  historically 
been  high  price  and  limited  memory  capacity.   Although  these 
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obstacles  still  exist,  bubble  memory  system's  costs  have 
decreased  significantly  in  the  past  three  years.   In 
addition,  higher  density  chips  promise  to  greatly  increase 
memory  capacity.   Intel  expects  to  market  a  4  Mbit  chip 
later  this  year,  followed  by  a  2  Mbyte  chip  in  1986.   Due 
to  the  entrenchment  of  disk  systems  in  the  marketplace  and 
continuing  increases  in  disk  density,  it  is  doubtful  that 
bubble  memory  will  ever  displace  the  floppy  or  hard  disk. 
There  appears  to  be  a  growing  demand  for  bubble  memory  in 
specialty  applications,  however.   Harsh  environments  such  as 
those  encountered  in  heavy  industry  can  be  easily  tolerated. 
This  fact  has  made  robotics  a  primary  source  of  utilization. 
Bubble  memory's  light  weight  and  compactness  is  invaluable 
to  portable  computer  systems  where  space  and  weight  are  at 
a  premium.   It's  rugged  dependability  allows  the  bubble  to 
be  used  where  maintenance  is  infrequent  or  not  possible. 
The  features  mentioned  above  have  drawn  a  serious  interest 
from  the  military.   The  harsh  conditions  encountered  in  the 
field  preclude  many  more  delicate  systems.   It  is  clear  that 
bubble  memory  will  continue  to  grow  in  importance  with 
future  developments.   As  computer  systems  find  more 
applications  outside  of  the  ideal  environment,  the  advantages 
of  bubble  memory  will  present  a  viable  alternative. 
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APPENDIX  A 
PROGRAM  LISTING  OF  BUB.A86 


title  'Bubble  Memory  Controller' 


cseg 

• 

org 

100 

1 

abtcmd 

equ 

19h 

opcomp " 

equ 

4:0b. 

cmdsts 

eau 

0fh 

datreg 

equ 

0eh 

blrpt 

equ 

0bh 

intcmd 

• 

equ 

llh 

cr 

eau 

0dh 

If 

equ 

0ah 

etx 

equ 

03h 

Jstart  of  code 


Jabort  command 
^operation  complete  mask 
Jcommand/status  port 
Jdata  port 
Jblock  1  reg  point 
initialize  command 


start 


call 


abort         JPover-up   command 


* 

s  routine  displays  the  function  menu   * 
executes  the  chosen  function.        * 

* 


*  Thi 

*  and 

* 

cmdex : 


mov  dx.offset  msgl 

call  prtmsg 

call  getchar 

and  al,7fh 

cmp  al ,e tx 

Jnz  instl 

call  system 

instl :   cmp  al ,  '1 ' 

jnz  inst2 

call  abortc 

inst2:   cmp  al,'2' 

jnz  inst3 

call  sencmd 

inst3:      cmp  al , '3' 

jnz  inst4 

call  getstat 


point  to  menu  message 
print  it 

get  console  input 
check  console  parity 
compare  input  to  control 


Abort  command 


Build  any  command 


Get  BMC  status 
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! 


inst4: 


cmp 
Jnz 
call 
jmp 


al,'4' 

cmdex 
f ormatb 
cmdex 


Format  Bubble 


*  * 

*  This  is  the  executive  routine  to  write   * 

*  the  parametric  registers.  * 

*  * 


vt reg: 


call 
call 
call 
xor 

ret 


getval 
uvtble 
vtregl 
al  ,al 


Jget  values  from  console 
;mov  the  values  to  proper 
Jload  the  values  into  the 
Jclear  al 


^Xt^*^*^*************************^*  ********** 

* 
rametric 
for  com- 


This  routine  loads  the  pa 
registers  in  preparation 
mand  execution. 


* 
* 

* 
*  * 

**#***$*#:*:*****  *  ******************  #***£***** 

vtreel : 

mov  al  ,blrpt 

out  cmdsts.al 

mov  bx,blklen 


mov  al,bl 

out  datres.al 

mov  al  ,nf c 

mov  cl,4 

shl  al,cl 

or  al  ,bh 

out  datreg.al 

mov  al, enable 

out  datreg,al 

mov  bx.pageno 

mov  al,bl 

out  datreg.al 

mov  al.bblnum 

mov  cl,3 

shl  al,cl 

or  al.bh 

out  datreg,al 


set  pointer  to  BLR(LSB) 

set  RAC 

load  block  length( termina 


this  series  of  instructio 

combines  block  length 

and  the  nfc  value 

to  form  a  sixteen  bit 

word  to  place  in 

the  block  length 

register 

send  enable  reg 
to  bmc 

load  starting  page  addres. 

this  series  of  instructio 

combines  page  address. 

and  bubble  number 

to  form  a  sixteen  bit 

word  to  place  in 

the  address 

register 
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;**** 


;* 


The  routine  aborts  the  bubble  memory    * 


j  ****£*****£*£******************************** 


abort 


"busy: 


poll 


retl 


ret2: 
loop: 


mov  cx,0ffffh 

mov  bh,opcomp 

mov  al,abtcmd 

out  cmdsts,al 

in  altcmdsts 

and  al,S0h 

jz  poll 

dec  ex 

ior  ax, ax 

cmp  cx,ax 

jnz  "busy 

jmp  retl 

in  alfcmdsts 

test  al,bh 

jnz  ret2 

dec  ex 

ior  ax, ax 

cmp  ex, ax 

jnz  poll 

in  al,cmdsts 

mov  dx, offset 

call  prtmsg 

call  system 

mov  dx, 27600 

xor  ax, ax 

dec  dx 

cmp  dx,ax 

jnz  loop 

in  al,cmdsts 

ret 


msg6 


init  time  out  cntr 

move  40h  to  hh 

load  abort  command 

send  abort  command 

read  status  reg 

mask  for  busy 

if  busy  jump  to  poll 

else  decrement  time  out 

clear  ax  reg 

check  time  out  count=0 

time  left, try  busy  again 

return  error 

read  status  reg 

wait  for  status=40h 

if  operation  complete  ret 

else  decrement  time  out 

clear  ax  reg 

compare  timeout  to  zero 

try  again 

return  with  status  fail 
abort  fail  msg 
print  the  message 
jump  to  system 

delay  100ms 

clear  ax  reg 
decrement  count 

compare  timeout  to  zero 
try  again 
get  status 


$:£$###:£  £££**:£*  J********  **************  ***##*:*** 
*  * 

*  This  routine  initializes  the  bubble     * 

*  * 
«*!}:««**  ^*^*  ***********************  *********** 

initz: 

mov     cx,0ffffh       Jset  timeout  counter 
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• 


"busy! 


polll 


retal 


reta2 


mov 
mov 
out 

in 
and 

jz 

dec 

xor 

cmp 
jnz 
Jmp 

in 
xor 

jz 

dec 

ior 

cmp 
jnz 

in 
mov 
call 
ret 

in 
mov 
call 
ret 


bh,  opcomp 
al , intcmd 
cmds ts ,  al 

al  ,cmdsts 

al,80h 

polll 

ex 

ax, ax 

ex, ax 

busyl 

retal 

al ,cmdsts 

al,bh 

reta2 

ex 

ax, ax 

ex  ,ax 

polll 

al , cmdsts 

dx, offset  msg4 

prtmsg 


mov  40h  into  bh 
load  init  command 
send  it 

get  status 
check  for  busy 
no-try  again 
decrement  timeout 
clear  ax 

compare  timeout  to 
try  again 
return  error 


zero 


al , cmdsts 
dx,  offset 
prtmsg 


msg2 


get  status 

check  for  op  comp 

yes-return  op  complete 

decrement  timeout 

clear  ax 

compare  timeout  to  zero 

try  again 

get  status 
timeout  failure 


Jget  status 
^operation  complete 


£********************* 

*  This  routine  conver 

*  to  hex  values  and  1 

*  into  the  proper  mem 

* 

-=$******************** 

mvtble: 

mov  bx,offs 

mov  dl,04 

call  convert 

mov  blklen, 

mov  dl,01 

call  convert 

mov  nfc,al 

mov  dl,02 

call  convert 

mov  enable, 

mov  dl,04 


*********************** 

* 
ts  the  console  input  * 
oads  these  values  * 
ory  locations.        * 

* 
*********************** 


et 


ax 


al 


temptbl       ;set  pointer 

;#  of  digits'  in  blklen 
;convert  decimal  to  hex 
Jmov  hex  value  to  mem  add 
;#  of  digits  in  nfc 
Jconvert  decimal  to  hex 
Jmov,  to  proper  address 
;#  of  digits  in  enable 
jconvert  decimal  to  hex 
Jmov  to  proper  address 
;#  of  digits  in  pageno 
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mov 
mov 
call 

pageno, ax 

dl,01 

convert 

mov 

ret 

b  blnum,  al 

Jmov  to  proper  addr 
;#  of  dibits  in  bblnum 
;  convert  decimal  to  hex 
Jmove  to  proper  addr 


.  .  ,  .  J.  f  *  J.  J.  .',  J<  ^  A  J.  vL  X  ^  s^  ^  X  X  J.  J-  J-  U,  J,  U-  X  ^,  Jf  4L  J-  .1,  ,1,  J.  J,  .t  .1,  J,  .1,  vi-  *  X  J-  vb  »l.  J- 
'i*  T  T  V  T  T  T  -i**!-*!**,.^*-***^*!****  ".*  T*  *T  "l*  *C  T*  *P  ¥  T  *.*  n*  *TT  *T*  "V  *P  *P  "I*  *»*  *P  1*  *P  ***  ***  H*  "VT  *V  ^  '1* 

*  * 

*  This  routine  calls  the  operating  system  * 

*  to  print  the  message  pointed  to  by  DX    * 

*  * 

********************************************* 

prtmsg: 

mov      clt09h  5 

int      224  ; 

ret 

*******  *******  *****************  ************** 
*  * 

*  This  routine  will  jump  from  this  program  * 

*  back  to  the  operating  system  * 

*  * 

J.XXv.  XXX  X  X  t«.  X  X  X  X  y-  »'-  -X,  ^    JU  .X.  -  C  JU  XXX»',XXXXXXXXXXXXXJ.XXXXX 

system: 


mov 

clt00h 

mov 

dl,00h 

int 

224 

**  **  *  **  *  ***  **  *  **  **  *  *  *  *  *  *  ******  ******  ********* 
*  * 

*  This  routine  uses  the  operating  system   * 

*  to  get  the  character  from  the  console    * 

*  * 
********************************************* 

getchar: 

mov     cl,01h 
int     224 
mov     templfal 
ret 

********************************************* 

*  * 

*  This  routine  calls  abort  and  initializes  * 

*  the  bubble  memory.  * 

*  * 

********************************************* 

abortc: 

call  abort  jSend  abort  command 

mov  dx.ds  Jmove  ds  location  to  dx 

mov  es,dx  Jset  es  equal  to  ds 

mov  si, offset  tablel     ;set  source  pointer 
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mov  di, offset  blklen     ;set  dest.  pointer 

mov  ci, 7  Jset  7  iterations 

eld  ;clear  direection  flag 

rep  movs   al,al  Jload  bytes  from  table 

call  vtregl  JWrite  BMC  registers 

call  initz  jSend  initialize  command 

xor  al,al  Jclear  al  before  return 
ret 

*  * 

*  This  rountine  executes  the  send  any  com-  * 

*  mand  function.  * 

*  .  .  * 

j}:^*^*^*  ****:{:**********************  ************ 

sencmd : 

call    getcmd  Jget  command  and  execute 

xor     al,al  Jclear  al  before  return 

ret 

££$****************************************** 
*  * 

*  This  routine  displays  the  status  byte    ♦ 
♦on  the  console.  ♦ 

*  * 

-:^^^^*^^**^**s!:^*****^****yr-************^***5i:5}:* 

getstat : 

stostat         ; 

dx, offset  status     Jprint  status  byte 

prtmsg  ; 

dx, offset  msgl3      Jprint  status  msg 


call 

mov 

call 

mov 

call 

xor 

ret 


prtmsg 
al,al 


Jclear  al  before  return 


wblrm : 


xor 
ret 


al  ,al 


Jcommand  not  implemented 


rdsk: 


xor 

ret 


al  ,al 


Jcommand  not  implemented 


rdblr: 


xor 

ret 


al,al 


Jcommand  not  implemented 


vrtblr : 


xor 
ret 


al  ,al 


Jcommand  not  implemented 
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vrtbl : 


al.al  Jcommand  not  implemented 


al,al  Jcommand  not  implemented 


al,al  Jcommand  not  implemented 


al,al  Jcommand  not  implemented 


al,al  Jcommand  not  implemented 


al,al  Jcommand  not  implemented 


i 

al.al  Jcommand  not  implemented 


al,al  Jcommand  not  implemented 


*  * 

*  This  is  the  calling  routine  to  write  a   * 

*  128  byte  sage  into  bubble  memory.        * 

*  * 

*^***«*  ***«****«  ****«5t:**  ************  ********* 

bmwrt : 

call    abortc   Jabort  and  initialize  the  bubble 
call    write    Jwrite  to  the  bubble  memory 
xor     al,al    Jclear  al  before  return 
ret 

**«*^«JJt***^«**^*^**^**5}t**>!t******3i!j}:^**^5}C**^*^>!s 

*  * 

*  This  is  the  calling  routine  to  read  a    * 

*  126  byte  page  from  bubble  memory.        * 

*  * 

sj:*^  *******************************  *********** 

bmrd : 
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• 

xor 
ret 

rdf sa: 

xor 
ret 

wrtsk : 

• 

xor 
ret 

rdbl: 

xor 
ret 

rdcd : 

xor 
ret 

resetf : 

xor 
ret 

• 
purge : 

xor 
ret 

• 
» 

reset : 

xor 

ret 

call  abortc  ;abort  and  initialize  the  bubble 

call  vtreg  Jload  the  parametric  registers 

call  read  Jread  from  the  bubble 

xor  al,al  ;clear  al  before  return 
ret 

********************************************* 
*  * 

*  This  routine  reads  the  status  register   * 

*  bit  by  bit  and  records  the  bit  value  in  * 

*  memory  as  an  ascii  1  or  0  .  * 

*  * 

V  nr  ^  'r-  ^  ^  -i>  -i*  -r  n*  -r-  '.-  -T-  -T--r  ^  *r  n-  -r  n^  -l-  V  -r  ^  n-  -i-  -l*  'i-  ^n*^T^T,^=  ^-***r^r*«'»r-r*i*^ 

stostat : 

in  al,cmdsts 

mov  bx, offset  (status+3) 

mov  ex, 8 


Jset  pointer  in  bx 
;set  number  of  loons 


again: 


skip: 
next : 


shl  al,l 
jb  skip 
mov  byte  ptr 
jmp     next 

mov  byte  ptr 


[bx] ,30h 
[bx] ,31h 


inc 
loop 
ior 
ret 

*********** 
* 

*  This  rou 

*  metric  r 

*  stores  t 
to  hex  v 


bx 

again 
bx  ,bx 


tshift  msb  to  left 
Jjump  if  carry  =  1 
Jstore  an  ascii  0 


Jstore  an  ascii  1 

i 

Jmove  pointer  up  one 
Sloop  to  beginning 
Jclear  bx 


* 

getval : 

mov 

call 

mov 

call 

call 

mov 

call 

mov 

call 

mov 

call 

mov 


* 

values  of  the  para-* 
the  console  and  * 
prior  to  conversion* 

* 

* 
********************************** 


tine  gets  the 
egisters  from 
hem  in  memory 
alues . 


dx, offset  msg? 

prtmsg 

dx, offset  msgS 

prtmsg 

conin 

temptbl ,al 

conin 

temptbl+1 ,al 

conin 

temptbl+2,al 

conin 

temptbl+3  ,al 


point  to  msg 
print  it 
point  to  msg 
print  it 

get  input  from  console 
mov  value  to  temp  table 

get  input  from  console 

move  to  memory  location 

get  input  from  console 

move  to  memory  location 

get  input  from  console 

move  to  memory  location 
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mov 

dx, offset  msg9 

call 

prtmsg 

call 

conin 

mov 

temptbl+4 ,al 

mov 

dx, offset  msgl0 

call 

prtmsg 

call 

conin 

mov 

temptbl+5 ,al 

call 

conin        x 

mov 

tempt bl+6,al 

mov 

dx, offset  msgll 

call 

prtmsg 

call 

conin 

mov 

temptbl+7 ,  al 

call 

c  onin 

mov 

temptbl+3,al 

call 

conin 

mov 

temptbl+9,al 

call 

conin 

mov 

tempt bl+10,al 

mov 

ix, offset  msgl2 

call 

prtmsg 

call 

c  oni  n 

mov 

temptbl+11 ,al 

ior 

ax  ,ai 

ret 

-r  1-  V  *r  nr  *P  -r  *r  'r  -r  *.»  -r  *.-  *r  ***  •r  '•* 


•**  *»*  -r  ***  -v  *r  -r  i* 


*  This  rou 

*  input  fr 


tine  converts 
om  the  console 


.  $$***%•■******** 

-  -  JL.  .'.  Jt  J.  X  J*  J,  J.  J.  u. 

convert : 

mov 

terop2f0000 

cmp 

dl,05  . 

jz 

convl0k 

cmp 

dlf04 

jz 

conv01k 

cmp 

dl,03 

jz 

c  onvl00 

cmp 

dlf02 

Jz 

conv010 

cmp 

41,01 

Jz 

. conv001 

call 

system 

convl0k: 

mov 

al,  [bx] 

sub 

al,30h 

mov 

dx,100P0 

mov 

ah,  00 

print  next  msg 

get  input  from  console 
move  to  memory  location 
print  next  msg 

get  input  from  console 

move  to  memory  location 

get  input  from  console 

move  to  memory  location 
print  next  msg 

get  input  value 
mov  to  memory  location 
get  input  from  console 
move  to  memory  location 
get  input  from  console 
move  to  memory  location 
get  input  from  console 
move  to  memory  location 
print  next  msg 

get  input  from  console 
move  to  memory  location 
clear  ax  register      i 


*i-  *»*  *r  nr  ^?  *i-  *,-  nr  *r  -nr  n*  *r  -t*  *r  -r  nr  *c*r  -»•  *v* 

the  decimal  values  * 
to  hex  values     * 

-r-r  tt¥ttt¥tt  tttv^tt^t 


clea 
see 
yes- 
see 
yes- 
see 
yes- 
see 
yes- 
see 
yes- 
jump 


r  memory 
if  there 
start  at 
if  there 
start  at 
if  there 
start  at 
if  there 
start  at 
if  there 
start  at 
back  to 


location 

are  five  digi 

10K 

are  four  digi 

01K 

are  three  dig 

100 

are  two  digit 

10 

is  one  digit 

1 

system  if  zer 


Jload  value  at  bx  pointer 
jconvert  it  from  ascii 
Jload  dx 
Jclear  ah 
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mul 


dx 


mov 

temp2,ax 

inc 

bx 

conv^lk: 

mov 

al,  [bx] 

sub 

al,30h 

mov  _ 

dx,1000 

mov 

ah,  00 

mul 

dx 

mov 

dx  tax 

mov 

ax, t  emp2 

add 

ax,dx 

mov 

t emp2,ax 

inc 

bx 

convl00: 

mov 

al,  [bx] 

sub 

a  1,3  Oh 

mov 

dx,100 

mov 

ah, 00 

mul 

dx 

mov 

dx  ,ax 

mov 

ax, temp2 

add 

ax  , dx 

mov 

temp2,ax 

inc 

bx 

convPl?: 

mov 

al, [bx] 

sub 

al ,30h 

mov 

dx,10 

mov 

ah, 00 

mul 

dx 

mov 

d  x,ax 

mov 

ax, temp2 

add 

ax  ,dx 

mov 

t emp2,ax 

inc 

bx 

conv001 : 

mov 

al,  [bx] 

sub 

al,30h 

mov 

ah, 00 

mov 

dx  ,ax 

mov 

ax , t emp2 

add 

ax,dx 

inc 

bx 

ret 

Jmultiply  al  by  10000 
Jstore  it 
Jincrement  pointer 

load  value  at  bx  pointer 

convert  from  ascii 

load  dx 

clear  ah 

multiply  al  by  1000 

store  result  in  dx 

get  result  from  previous 

add  the  two 

store  the  total 

increment  the  pointer 

load  value  at  bx  pointer 

convert  from  ascii 

load  dx 

clear  ah 

multiply  al  by  100 

store  result  in  dx 

get  total  from  previous 

add  the  two 

store  the  total  t 

increment  the  pointer 


load  value  at  bx  pointer 
convert  from  ascii 
load  dx 
clear  ah 

multiply  al  by  10 
store  result  in  dx 
set    total  from  previous 
add  the  two 
store  the  total 
increment  the  pointer 

Jload  value  at  bx  pointer 
Jconvert  from  ascii 
jclear  ah 

Jstore  result  in  dx 
',get    total  from  previous 
;add  the  two 
^increment  the  pointer 
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*  Thi 


J.  J.  A  .t  J.  .^  .1.  J.  ^-  J.  .«.  J.  ,',  ,1,  J.  .1-  J.  .'•  ^.  X  J.  .1,  J.  ^  ,L  ^.  J,  J,  .L  X  ,1,  J,  J.  J,  J,  J.  J.  ^  ,»,  J,  * 

------  ^-  ,,—---  -T-  -.»  -._,--,»  «,*  ^-  -v  -r  - ,-  -p  ~(-  ^~  -r  -,-  ^»  v  i- y  -»»  ^  r  *i*  J4»  *r  *i*  *»^  *»-  *r  t*  i*  *r-  *r  t* 


s  routine  reads  12S  "bytes  from  the 
bubble  memory 


*  * 

/.  j.  u.  x  ^  x  x  ^  j-  ^  u,  j.  ^  j,  j.  a-  x  a.  x-  .t  j-  a-  ^.  j.  .u  ,i.  .i.  .i.  j-  a  *  ,v,  u.  »'-  x  x  ^/  .«.  x  j.  a.  .i.  a.  x  j. 

reed: 


readl : 


read2: 


read3: 


skipl: 


Dause : 


pollb: 


contin 


mov 
mov 
mov 
mov 
mov 
mov 
out 
mov 

in 

test 

loopz 

jcxz 

mov 

in 

test 

jz 

in 

stos 

loop 

Jmp 

mov 
test 

Jz 

dec 

cmp 
Jnz 
sub 
mov 
Jmp 

in 

test 

Jz 
mov 

in 

test 
loopnz 
Jcxz 


cx,128 
bx.ci 
dif offset 
ax  ,ds 
es.ax 
al,12h 
cmds ts ,al 
cx,0ffffh 

al ,cmdsts 
alf80h 
readl 
errorl 
ex,  bx 

a  1 ,cmdsts 

al,01h 

read3 

al  f datreg 

al 

read2 

pause 

dxf0ffffh 

altB0h 

skipl 

dx 

dxt0 

read2 

bx ,  ex 

temp3 ,bx 

error2 

al tcmdsts 
al,80h 
contin 
cxf0ffffh 

al , cmdsts 
al,80h 
pollb 
errorl 


J128  byte  count 
Jsave  count  in  bx 
datbufJset  pntr  to  buffer 
Jset  es  equal  to  ds 

Jload  read  command 

Jsend  it  , 

Jload  ex  with  counter 

Jget  status 

;test  for  busy 

Jvait  for  busy 

Jtimeout  error 

Jload  #  of  bytes  in  ex 


get  status 

test  for  fifo  empty 

yes.check  for  busy 

no  ,get  data 

store  it 

try  again 

wait  for  good  status 

Jtimeout  in  dx  reg 

Jcheck  for  busy 

» 

^decrement  timeout  cntr 

Jcompare  timeout  to  0 

;still  busy-vait 

Jbytes  transferred  in  bx 

Istore  byte  trans  count 

;op  fail  error 

;get  status 
Jcheck  for  busy 
;not  busy-send  status 
Iset  up  timeout  cntr 

Jget  status 

Jcheck  for  busy 

;wait  for  busy  to  clear 

;but  not  too  long 
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errorl 


error2 


mov 

call 

ret 

call 
mov 
call 
ret 

call 
mov 

call 

ret 


$  S  £  $  $  $  £  #  $  #  3":  *#  £ 

*  This  routin 

* 

write : 

mov 

mov 

mov 

out 

push 

call 

poo 

mov 


ix, offset  msg2   ;op  complete  msg 
prtmsg  J 


getstat         {display  status  byte 
dx, offset  mss4   Jtimeout  failure 
prtmsg  ; 


getstat        Jdisplay  status  "byte 
dx, offset  msg3   ?op  fail  msg 
prtmsff  J 


£  $  £  if  if  if  if  if  if  if  *  if  if  if  if  if  -s  ajc  *  $  #  #  if  if  if  if  #  *  if  if  if 

e  writes  128  bytes  into  the   * 
bubble  memory 


* 


writea 


writel 


write2 


mov 
out 
mov 

in 

test 

loopz 

jcxz 

test 

loopz 

Jcxz 

mov 

in 

test 

Jz 

lods 
out 
loop 

jmp 


ex, 128 

DX  ,CX 

al.ldh 

cmdsts.al 

bx 

w  treg 

bx 

si, of fset 

al,13h 
cmds ts ,al 
cx,0ffffh 

al  ,cmdsts 

al,80h 

writel 

errorll 

al,01h 

writel 

errorll 

ex  ,bx 

al  ,cmdsts 

al,01h 

write3 

al 

datreg.al 

write2 

pausel 


wrtbuf 


#    of   bytes   to  write 

save   in   bx 

fifo  reset  cmd 

issue  it 

save  bx 

write  registers 

retrieve  bx 

set  pointer 

load  write  cmd 
issue  it 
timeout  cntr 

get  status 

check  for  busy 

wait  for  busy 

timeout  error 

check  for  fifo  ready 

wait  for  fifo 

timeout  error 

load  #  of  bytes  in  ex 

get  status 

check  for  fifo  ready 

no-wai  t 

yes-get  data 

send  data  to  bubble 

go  again 

return  good  status 
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vri te3: 


sklpll: 

pausel : 


pollbl: 


continl 


errorll : 


error22: 


mov 
test 

jz 

dec 

cmp 
jnz 
sub 
jmp 

in 
test 

J« 

mov 

in 

test 
loopnz 
Jcxz 

call 
mov 
call 
ret 

call 
mov 
call 
ret 

call 

mov 

call 

ret 


dx,0ffffh 

al?80h 

skipll 

di 

dxf0 

vrite2 

bx,  ci 

error22 

al , cmdsts 
al ,90h 
continl 
cx,0ffffh 

al , cmdsts 
alfS0h 
pollbl 
errorll 

gets  tat 
dx,  offset 
prtms^ 


msg2 


set  timeout  cntr 
test  for  "busy 

dec  timeout  cntr 
compare  timeout  to  0 
try  again 
#  of  bytes  trans. 
op  fail  error 

Jset  status 
Jcheck  for  busy 
Jreturn  staus/op  comp 
Jset  timeout 

Jget  status 

Jcheck  for  busy 

;wait 

Jbut  not  too  long 

Jdisplay  status 
;op  complete  msg 


Jdisplay  status 
Jtimeout  failure 


gets  tat 

dx, offset  msg4 

prtmsg 


getstat         Jdisplay  status 
dx, offset  msg3   Jop  fail  msg 
prtmsg  J 


j ************* 


This  routi 
the  send-a 
menu.   It 
routines  f 


*  *******  ******  **  *****  *  ****  #  **  ***  *  *  * 

ne  presents  the  command  menu  for 
ny-command  function  in  the  main 
also  calls  the  appropriate  sub- 
or  the  chosen  commands. 


;* 


.************************************************ 


getcmd : 


mov  dx, offset  msgl4 

call  prtmsg 

call  getchar 

and  al,7fh 

cmp  al,etx 

Jnz  cmd0 


Print  menu  for  commands 
Get  console  input 
Compare  with  control  C 
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call 

system 

cmd0: 

cmp 

alf'0' 

Jnz 

cmdl 

call 

vblrm 

cmdl : 

cmp 

alf  1 

jnz 

cmd2 

call 

abor tc 

cmd2: 

cmp 

al,'2' 

Jnz 

cmd3 

call 

bmrd 

cmd3 : 

cmp 

al,'3' 

Jnz 

cmd4 

call 

bmvrt 

cmd4: 

cmp 

1      '     A      ' 

al  t  4 

jnz 

cmd5 

call 

rdsk 

crnd5: 

cmp 

al,'5' 

Jnz 

cmd6 

call 

rdblr 

cmd6: 

cmp 

al,'6' 

jnz 

cmd7 

call 

wrtblr 

cmd7: 

cmp 

al,'7' 

Jnz 

cmdB 

call 

wrtbl 

cmd8: 

cmp 

al/8' 

Jnz 

cmd9 

call 

rdfsa 

cmd9: 

cmp 

alt'9' 

/ 

jnz 

cmda 

call 

abortc 

cmda : 

cmp 

al/A' 

jnz 

cmdb 

call 

vrtsk 

cmdb: 

cmp 

al.'B' 

Jnz 

cmdc 

call 

rdbl 

cmde : 

cmp 

al.'C' 

Jnz 

cmdd 

call 

rici 

cmdd: 

cmp 

al.'D' 

jnz 

cmde 

call 

resetf 

cmde: 

cmp 

al.'E' 

Jnz 

cmdf 

call 

purge 

cmdf: 

cmp 

al.'F' 

call 

reset 

• 

ret 

i 
conin : 

If  Control  C  jmp  to  system 
Write  bootloop  register  mas) 


Initialize  command 

Read  bubble  data 

Write  bubble  data 

Head  seek 

Read  bootloop  register 

Write  bootloop  register 

Write  bootloop 

Read  FSA  status 

Abort 

Write  seek 

Read  bootloop 

Read  corrected  data 

Reset  fifo 

MBM  purge 

Sortware  reset 
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mov  cl,01h      ; 

int  224  ; 

Vet  ; 

* 
* 


„  „  „  T  ..  Y  *  ,,.  T  -*  J?  r  «r  T  ^,-  ^  ^  ,P  r  *,.  T  .r  t  t  '.•  f  t  '.•  t  t  •-•  -f  t  i  'i-  r  t  i-  -r-*A  *r  -r  -i*  -r  *? 


This  routines  writes 
in  the  bubble  memory 
Dreoaratory  to  using 

disk 


0e5h  into  each  "byte 
system.   This  is 
the  bubble  as  a 


f ormatb 


f orma tl 


mov  ix,2047 

mov  ax,P001h 

mov  blklen,ax 

mov  al ,02b 

mov  nfctal 

mov  al,20h 

mov  enable, al 

mov  al,00h 

mov  bblnum,al 

mov  al,ldh 

out  cmdsts,al 

mov  ax ,dx 

mov  pageno,ax 

call  vtregl 

mov  bx,128 

push  dx 

mov  si, offset 

call  writea 

pop  dx 

dec  dx 

cmp  dxt0 

jnz  formatl 
ret 


#   of 


set    counter    equal    to 
load    block   length 
block   length   equal    1 
load    nfc    value 
nfc    equal    2 
load    enable    register 
enable    equal    20h(level   1 
clear   al 
bblnum   equal    0 


val  ue 

E 


load 
send 
move 
page 
load 


fifo  cmd 


reset 
it 

value  in  dx  to  ax 
address  equal  to  valu 
the  parametric  resist 
bx  eaual  byte  count 
save  dx  value 
frmbuf        ;set  pointer 

Jwrite  a  128  byte  page 
^retrieve   dx  value 
Jdecrement  dx  by  one 
Jcompare  dx  to  zero 
Jif  not  zero  go  again 


blkle 

nfc 

er.abl 

pagen 

bblnu 


n  rv 
rb 
e  rb 
o  rv 
m  rb 


ablel  db 
table2  rb 
table3   rb 


1 
1 

1 
1 
1 


00,00,01  ,20h,03h,0ffh,01 
7 
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temptbl  rb 


tempi 

temp2 

temp3 

datbuf 
i 

f rmbuf 


vrtbuf 


tempst 


ms^l 


rb 
rv 
rw 
rb 

dlJ 

db 
db 
db 
db 
db 
db 
db 
db 
db 
db 
db 
db 
db 
db 

db 
db 
db 
db 
db 
db 
db 
db 
db 
db 
db 
db 
db 
rb 


status  db 


db 
db 
db 
db 
db 
db 


12 

1 

1 

1 

128 

0e5h 
0e5h 
0e5h 
0e5h 
0e5h 
0e5h 
0e5h 
0e5h 
0e5h 
0e5h 
0e5b 
0e5h 
0e5h 
0e5h 
0e5h 


t0e5h 
,0e5h 
,0e5h 
,0e5h 
,0e5b 
,0e5h 
,0e5h 
,0e5h 
,0e5h 
,0e5h 
f0e5h 
t0e5h 
,0e5h 
,0e5b 
,0e5b 


,0e5h 
,0e5b 
,0e5b 
,0e5h 
,  0e5h 
,0e5h 
,0e5h 
,  0e5h 
,  0e5h 
,0e5h 
,  0e5h 
,0e5h 
,  0e5h 
f0e5h 


,0e5h 
,0e5b 
,0e5h 
,0e5b 
f  0e5h 
,0e5h 
,0e5h 
,0e5h 
,0e5h 
,0e5h 
,0e5b 
,0e5h 
,0e5h 
,0e5h 


,0e5h 
f0e5h 
f0e5h 
,0e5h 
f0e5h 
,0e5h 
,0e5h 
tee5h 
,0e5h 
,0e5h 
,0e5h 
,0e5h 
,0e5h 
,0e5b 


,0e5h 
,0e5b 
t0e5h 
,0e5h 
,  0e5b 
,  0e5b 
,0e5h 
,  0e5b 
,0e5h 
t0e5h 
,0e5h 
,0e5h 
,0e5h 
,  0e5b 


,0e5h 
,0e5h 
,0e5h 
,0e5h 
,0e5h 
,0e5h 
,0e5b 
,0e5h 
,0e5b 
,Pe5h 
,0e5b 
,0e5h 
,0e5h 
,0e5b 


,  0e5h 
f  0e5h 
,0e5h 
,0e5h 
,0e5h 
,  0e5h 
,0e5h 
,  0e5b 
,0e5b 
,0e5b 
,  0e5b 
,0e5b 
,0e5b 
,  0e5h 


r0e5h 
,0e5h 
,0e5b 
,0e5h 
,0e5b 
,0e5h 
,0e5h 
,  0e5h 
T0e5h 
,0e5b 
,0e5h 
,0e5h 
,0e5h 
,0e5b 


00b, 01b 
0ah,0bh 
14b, 15h 
leb, lfh 
28b, 29h 
32h,33h 
3ch,3dh 
46b,47h 


50h 
5ah 
64b 
6eh 


51h 
5bh 
65h 
6fh 


78b, 79b 
1 


,  02  h 
,0ch 
f16h 
,20h 
,2ab 
,34b 
,3eb 
,48b 
,52b 
,  5ch 
,66b 
,70h 
,7ab 


,03b 
,0dh 
,17h 
,21h 
,2bb 
,35h 
f3fh 
,49b 
,53h 
,5db 
,67h 
,71b 
,7bh 


,04b 
,0eh 
f18h 
,22h 
,2ch 
,36b 
,40b 
,4ab 
,54h 
,5eh 
,68b 
,72h 
,7ch 


,0  5h 
,0fh 
,19h 
,23h 
,2dh 
,37h 
,41h 
,4bh 
,55b 
,5fh 
,69h 
,73h 
,7dh 


,06h 
,10h 
,lah 
,24b 
,2eh 
,38h 
,42h 
,4ch 
,56h 
,60h 
,  6ah 
,74b 
,7eh 


,07b 
,11b 
,lbb 
,25h 
,2fh 
,39h 
,43h 
,4dh 
,57h 
,61h 
,6bb 
,75b 
,7fh 


,08b 
,12h 
,lch 
,26b 
,30h 
,3ah 
,44h 
,4eh 
,58h 
,62h 
,6ch 
,76b 


,09b 
,13h 
,ldh 
,27b 
,31h 
,3bh 
,45h 
,4fh 
,59h 
,63h 
,6db 
,77h 


r,lf.'    \'X\'X\'X','X','X\'X','X','X',lf 

cr.lf,*  Menu    for   Bubble   Memory  Control] 

cr,lf,'  select    one   function' 

CTtlfflff'    1   -   Abort    Command' 
cr,lf,'    2   -   Send    Any   Command' 
cr,lf,'   3   -  Get    Bubble   Memory  Status' 
cr,lf,'    4   -  Format    Bubble    Memory ' ,cr , If ,'$ ' 
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msg2 

db 

msg3 

db 

msg4 

db 

msg5 

db 

msg6 

db 

msg7 

db 

msg8 

db 

msg9 

db 

msgl0 

db 

msgll 

db 

msgl2 

db 

msel3 

db 

msgl4 

db 

db 

db 

db 

db 

db 

db 

db 

db 

db 

db 

db 

db 

db 

db 

db 

db 

db 

cr, If , 'Operation  Complete  ','$  ' 
cr,lf, 'Operation  Failed', '$' 
cr, If, 'Time  Out  Failure', '$' 
cr,lf,'No  Response' ,'$ ' 
cr,lf, 'Abort  Fail',  '$  ' 

cr, If, 'Enter  Parametric  Register  values', '$ 
cr, If, 'Block  Length  0-2047  (enter  4  digits) 
cr,lf, 'Number  of  Channels  0-4  (enter  1  digi 
cr,lf,'Set  Inable  Register  1-99  (enter  2  di 
cr, If, 'Page  Number  0-2047  (enter  4  digits)' 
cr,lf, 'Bubble  Number  0-3  (enter  1  digit)',' 
cr,'This  is  the  Status  Byte  '  ,cr  ,lf ,  '$  ' 
cr,lf,'   Menu  for  Command  Selection 


cr,lf 
cr.lf 
cr,lf 
cr,lf 
cr.lf 
cr.lf 
cr,lf 
cr.lf 
cr.lf 
cr.lf 
cr,lf 
cr.lf 
cr.lf 
cr,lf 
cr.lf 
cr.lf 
cr.lf 


Select  One 
If,'  0  -  Write  Bootlocp  Register  Mask 
'  1  -  Initialize' 
'  2  -  Read  Bubble  Data' 
'  3  -  Write  Bubble  Data' 
'  4  -  Read  Seek' 

5  -  Read  Bootloop  Register' 

6  -  Write  Bootloop  Register' 
'  7  -  Write  Bootloop' 

'  8  -  Read  FSi  Status' 
'  9  -  Abort' 
'  A  -  Write  Seek' 
'  B  -  Read  Bootloop' 

C  -  Read  Corrected  Data' 
'  D  -  Reset  FIFO' 
'  E  -  MBM  Purse' 
'  T  -  Software  Reset ',cr, If ,'$ ' 


end 
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APPENDIX  B 
PROGRAM  LISTING  OF  SINGLES. DEF 


disks  3 

diskdef  0,1 ,26,6,1024,243,64,64,2 

diskdef  1,0 

diskdef  2,1 ,26,0,1024,243,64,64,2 

endef 
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APPENDIX  C 
PROGRAM  LISTING  OF  SINGLES. LIB 


dp  case 
dpeB 


dpel 


dpe2 


dpt0 


xlt0 


als0 

CSS0 

• 

dpbl 
alsl 
cssl 
xltl 

• 

dpb2 


DISKS  3 

equ 

dw 

dw 

dv 

dw 

dw 

dw 

dw 

dw 

dw 

dw 

dw 

dw 

DISKDZT 

equ 

dw 

db 

db 

db 

dw 

dw 

db 

db 

dw 

dw 

equ 

db 

db 

db 

db 

db 

db 

db 

equ 

equ 

EISIEE? 

equ 

equ 

equ 

equ 

DISKIEF 

equ 


$ 

xlt0,00 
0000h  ,0 
dirbuf , 
csv0  ,al 
xltl, 00 

00e0h,e 

dirbuf , 

csvl  ,al 

xlt2,00 

0200h,0 

dirbuf, 

csv2  ,al 

0,1,26, 

offset 

26 

7 

0 

242 

63 

192 

0 

16 

2 

offset 

1,7,13, 

25,5,11 

<-  <_  ,0  ,zt  , 

21,2,8, 

20,26,6 

18,24,4 

16,22 

31 

16 

i.e 

dpb0 
als0 

CSS0 

xlt0 

2,1,26, 

offset 


00h 

000h 

dpb0 

v0 

00h 

000b 

dpbl 

vl 

00h 

000h 

dpb2 

v2 

6,1024 

$ 


,24 


$ 

19 

,17 

15 

14 

,12 

,10 


Base  of 

Transla 

Scratch 

Dir  Buf 

Check, 

Transla 

Scratch 

Dir  Buf 

Check, 

Transla 

Scratch 

Dir  Buf 

Check, 

,64,64, 

Disk  Pa 

Sectors 

Block  S 

Block  M 

Ixtnt  M 

Disk  Si 

Directo 

Alloc0 

Allocl 

Check  S 

Offset 

Transla 


Disk  Parameter 
te  Table 

Area 
f,  Parm  Block 
Alloc  Vectors 
te  Table 

Area 
f,  Parm  Block 
Alloc  Vectors 
te  Table 

Area 
f,  Parm  Block 
Alloc  Vectors 
2 
rameter  Block 

Per  Track 
nift 
ask 
ask 
ze  -  1 
ry  Max 

ize 

te  Table 


Bloc 


0,1024 
$ 


JAllccation  Vector  Size 
JCheck  Vector  Size 

JEquivalent  Parameters 
JSame  Allocation  Vector  Size 
JSame  Checksum  Vector  Size 
JSame  Translate  Table 
,243,64,64,2 

JDisk  Parameter  Block 
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ilt2 


3ls2 
ss2 


dw  26 

db  3 

db  7 

ai  0 

dw  242 

dw  63 

db  192 

db  0 

dw  16 

dw  2 

equ  offset  $ 

db  1,2,3,4 

db  5,6,7,8 

db  9,10, 11, 12 

db  13,14,15,16 

db  17,18,19,20 

db  21,22,23,24 

db  25,25 

equ  31 

equ  16 

ENDEI 


Sectors  Per  Track 
Block  Shift 
Elock  Mask 
Extnt  Mask 
Disk  Size  -  1 
Directory  Max 
Alloc0 
Allocl 
Check  Size 
Offset 
Translate  Table 


JAllocaticn  Vector  Size 
JCheck  Vector  Size 


Uninitialized  Scratch  Memory  Follows: 


tegrdat 
iirbuf 
3lv0 

CSV0 

alvl 
csvl 
alv2 
csv2 

eDddat 
datsiz 


equ 

rs 

rs 

rs 

rs 

rs 

rs 

rs 

equ 

equ 

db 


offset 

128 

als0 

CSS0 

alsl 

cssl 

als2 

css2 

offset 

offset 

0 


$ 


L 


begdat 


Start  of  Scratch  Area 

Directory  Suffer 

Alloc  Vector 

Check  Vector 

Alloc  Vector 

Check  Vector 

Alloc  Vector 

Check  Vector 

End  of  Scratch  Area 

Size  of  Scratch  Area 

Marks  End  of  Module 
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APPENDIX  D 
PROGRAM  LISTING  OF  BUBBIOS.A86 


title    'Customized  Basic  I/O  System' 

*  * 

*  This  Customized  BIOS  adapts  CP/M-86  to     * 

*  the  following  hardvare  configuration       * 

*  Processor:   iSBC  8612  * 

*  Controller:   iSBC  201  * 

*  ISBC  254  Buttle  Memory  * 

*  Memory  model:   8080  * 

*  Programmer:  Gary  Theis  * 

*  Revisions  :  * 

true  equ  -1 

false  equ  not  true 

cr  equ  0dh  ^carriage  return 

If  equ  0ab  Jline  feed 

rrax_retries  equ  10   Jfor  disk  i/o,  "before  perm  error 

*  * 

*  Loader   t-ios   is    true    if  assembling    the            * 

*  LOADER'BIOS,    otherwise  EIOS    is    for    the          * 

*  CFM.SYS  file.  * 

*  * 

********************************************* 

LOADER_BIOS      EQU  FAISE 

tdos_int        equ  224  Jreserved  BDOS  interrupt 

IT      not  loader_Mos 

• 

•  i  i 

i  i  i 

tios  code       equ  2500h 

ccp  offset      equ '0000h 

tdos  ofst       equ  0B06h  JBDOS  entry  point 
.  i  i 

f  i  i 

» — 

ENDIT    Jnot  loader  Mos 
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II 


loader    "bios 


•  t 


tios_  code 
ccp_off set 
bdos   ofst 


'  i 


equ  1200h  ;start  of  LDBIOS 
equ  0003b  Jbase  of  CPMLOADER 
equ  0406h  Jstripped  BEOS  eDtry 

i 


csts 

cdata 


ENDII 

equ  0dah 
equ  0d8h 


J  loader  bios 


JI8251  status  port 
J        data 


*  * 

*  INTEL  iSBC  201  Disk  Controller  Ports      * 

*  * 

********************************************* 


base 

equ 

078h 

rtype 

equ 

tase+1 

rryte 

equ 

base+3 

reset 

equ 

base+7 

dstat 

equ 

base 

ilov 

equ 

base+1 

ihigb 

equ 

base+2 

***************************  *********if.****if**y!f. 

*  * 

*  INTEL  iSBC  254  Bubble  Memory  Ports        * 

*  and  Equates  * 

*  * 

********************************************* 


blrpt 

equ 

0bb 

cmdsts 

equ 

0fh 

datreg 

equ 

0eh 

nfc 

equ 

02h 

enable 

equ 

20h 

bblnum 

equ 

00h 

blklen 

equ 

01b 

abtcmd 

equ 

ISh 

intcmd 

equ 

•lib 

rdcrrd 

equ 

12b 

wrtcmd 

equ 

13h 

f  rcmd 

equ 

ldh 

pointer  to  first 
command/status 
data  port 
nurrber  of  cbann 
enable  register 
sets  bubble  sel 
sets  128  byte  bl 
abort  command 
initialize  comm 
read  command 
write  command 
fifo  reset  comm.. 
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II      not  loader  bios 


»  —  — 

•  i  i 

i  i  t 

J  This  is  a  BIOS  for  the  CPM.SYS  file. 
;  Setup  all  interrupt  vectors  in  low 
J  memory  to  address  trap 

call    abort    jabort  the  buttle 

call    initb    initialize  the  bubble 

push  ds         Jsave  the  DS  register 

irov  IOBYTE.0     Jcleer  I03YTE 

mov  ax,0 

mov  ds.ax 

rrov  es,ax       Jset  ES  and  DS  to  zero 

Jsetup  interrupt  0  to  address  trap  routine 

rrov  int0  of f  set , of  f  set  int_trap 

rrov  intersegment ,CS 

mov  di , 4 

mov  si,0        Jthen  propagate 

mov  cx,510      Jtrap  vector  to 

rep  movs  axtax   Jail  256  interrupts 

JBDOS  offset  to  proper  interrupt 

mov  bdos_ off  set , bdos_of st 

pop  ds  Jrestore  the  DS  register 

J        (additional  CP/K-86  initialization) 

•  i  i 

»  i  i 

ENDIE    Jnot  loader_bios 
II      loader  bios 


» - 

•  i 
»  i 


»  i 


> 


JThis  is  a  BIOS  for  the  LOADER 

push  ds         Jsave  data  segment 

mov  ax,0 

mov  ds.ax       Jpoint  to  segment  zero 

;ED0S  interrupt  offset 

mov  bdos_ of f set  ,bdos_ of st 

mov  bdos  segment, CS  Jbdos  interrupt  segment 

(additional  LOADER  initialization) 

pop  ds  Jrestore  data  segment 


ENDII   Jloader.bios 

mov  bx, offset  signon 

call  pmsg  Jprlnt  signon  message 

mov  cl,0  Jdefault  to  dr  A:  on  coldstart 

Jmp  ccp  ijump  to  cold  start  entry  of  CCP 
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ccp: 


cseg 
org 

org 


ccpof f set 
tios  cede 


*  BIOS  Jump  Vector  for  Individual  Routines   * 

*  * 

Inter  from  BOOT  ROM  or  LOADER 
Arrive  here  from  BDOS  call  0 
return  console  keyboard  status 
return  console  keyboard  char 
write  char  to  console  device 
write  character  to  list  device 
write  character  to  punch  device 
return  char  from  reader  device 
move  to  trk  00  on  cur  sel  drive 
select  disk  for  next  rd/write 
set  track  for  next  rd/write 
set  sector  for  next  rd/write 
set  offset  for  user  huff  (DMA) 
read  a  128  byte  sector 
write  a  128  byte  sector 
return  list  status 
xlate  logical->physical  sector 
set  seg  base  for  buff  (DMA) 
return  offset  of  Mem  Desc  Table 
return  I/O  map  byte  (IOBYTE) 
set  I/O  map  byte  (IOBYTE) 

*$**$# ZZ************************************* 

*  1N1T  Entry  Foint,  Differs  for  LDBIOS  and   * 

*  BIOS,  according  to  "Loader_Bios"  value    * 

^if^  ^fiHf  if  ^*i/i^*^iifiif^  ***************************** 

INIT:    Jprint  signon  message  and  initialize  hardware 


jn-p 

INIT 

Jirp 

WBOOT 

jirp 

CONST 

Jn-p 

CONIN 

jirp 

CONOUT 

Jmp 

LISTOUT 

Jn- 

PUNCH 

JNP 

HEADER 

jn-p 

EOME 

>P 

SELDSX 

Jirp 

SETTRK 

>P 

SSTSEC 

>! 

SETDMA 

jrrp 

READ 

3«I 

WRITE 

J*P 

L1STST 

j^p 

SECTRAN 

Jmp 

SETDMAB 

Jmp 

GETSEGT 

jmp 

GETIOEF 

>p 

SETI03E 

;we  entered 
JCS:  as  the 

Jand  ES: 
stack  during 
mcv  sp, offset  stkbase 
eld  Jset  forward 


mov  ax,cs 
mov  sstax 
mov  ds,ax 
mov  es,ax 
Juse  local 


with  a  JMPF  so  use 
initial  value  of  SS 


initialization 
direction 
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VBOOT;   jmp  ccp+6        Jdirect  entry  to  CCP  at  command  1 

IF      not  loader_tios 

>  —    — 

•  i  i 

>  i  i 

int_trap: 

cli  Jfclock    interrupts 

mov    ai,cs 

irov  ds,ax       >get  our  data  segment 

mov  tx , offset  int_trp 

call  pmsg 

bit  Jhardstop 

•  t  i 

>  i  i 
• 

ENDII        Jnot   loader_tios 

*  CP/r*   Character   I/O    Interface   Routines        * 

*  # 

*  console  is  USART  (18251A)  on  iSBC  8612  * 

*  at  ports  D8/DA  * 

********************************************* 

CONST:  Jconsole  status 

in  al ,csts 

and  al ,  2 

jz  const  ret 

or  al,255       Jreturn  non-zero  if  rda 
const_ret : 

ret  Jrcvr  data  available 

CONIN:  Jconsole  input 

call  CONST 

jz  CONIN         Jvait  for  RDA 
in  al,cdata 

and  al ,7f h      Jread  data  &  remove  parity  "bit 
ret 

CONOUT:         Jconsole  output 
in  al.csts 

and  al,l        >get  console  status 
Jz  CONOUT 
mov  al.cl 

out  cdatatal     ^transmitter  "buffer  is  empty 
ret'  Jthen  return  data 

IISTOUT:  Uist  device  output 

Jnot  implemented 
ret 
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LISTST: 

FUNCB: 
READER: 

GETIOB?: 

SETIOBE: 


ret 


Jpoll  list  status 
Jnot  implemented 


Jwrite  punch  device 

Jnot  implemented 


mov  al,lah 
ret 


MOV  AL,ICEYTE 
ret 


Jreturn  eof  for  now 


JIOBYTE  NOT  IMPLEMENTED 


MOV  IOEYTE.CL 
ret 


Jiotyte  not  implemented 


J  Routine  to  get  and  echo  a  console  character 
i  and  shift  it  tc  upper  case 


uconechc : 

call  CONIN 
push  ax 
mov  cl tal 
call  CONOUT 
pop  ax 
cmp  al ,  a 
jb  uret 
cmp  si v  z 
ja  uret 
suh  al , 'a  '-'A 


uret : 
prrsg: 


ret 

mov  al ,  [BX] 
test  al ,al 
jz  return 
irov  CL,AL 
call  CONOUT 
inc  BX 
jmps  pmsg 


Jget  a  console  character 

Jsave  and 

Jecbo  to  console 

Jless  than  'a'  is  ok 

igreater  than  'z'  is  ok 
Jelse  shift  to  caps 

Jget  next  char  from  message 

Jif  zero  return 

Jprint  it 

Jnext  character  and  loop 


*  Disk  Input/Output  Routines       * 
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SELDSX 
ndisks 


return 


BOPE 


J  select  disk  given 
equ     3  Jnumber  of  disks 
irov  disk,cl 
mov  bx,0£00h 
cl ,ndi  sks 


cmp 
jnb 
mov 
mov 
mov 
shl 


return 

ch,0 

bx  ,cx 

cl,4 

bx  ,  cl 

mov   cx.offset  dpbase 
add    bx,cx  Jdpbase   +   n 

ret  Jbx    =    .dph 


"by  register 
(up  to  16) 

J  save  disk  number 

Jready  for  error  return 

Jn  "beyond  max  disks? 

Jreturn  if  so 

Jdouble  (n ) 

Jbx  =  n 

Jready  for  *16 

;n  =  n  *  16 


CL 


*  16 


ret  hme 


Jmove  selected  disk  to 
mov     trk,0 
mov     al  ,disk 
cmp     al,2 
jz      ret_hme 
mov  io_com  ,homcom 
call  execute 
:        ret 


borne  position  (Track  0) 
J  zero  tbe  track  number 
Jget  disk  number 
Jcheck  if  its  the  bubble 
Jskip  if  so 


SITTBK:  Jset  track  address  given  by  CL 
mov  trk,CL 
ret 


SITSIC: 


SECTHAN 


Jset  sector  number  given  by  cl 

mov  sect.CL 

ret 


:  Jtranslate 
mov  cb,0 
mov  bx,cx 
add  bx,dx 
mov  bl,  [bx] 
ret 


sector  CX  using  table  at  [DX] 


Jadd  sector  to  tran  table  address 
Jget  logical  sector 


SETDfA:  Jset  DMA  offset  given  by  CX 
mov  dma_adr,CX 
ret 

SETLtfAB:  Jset  DMA  segment  given  by  CX 
mov  dma_seg,CX 
ret 

GITSEST:   J  return  address  of  physical  memory  table 
mov  bx, offset  seg_table 
ret 
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-^^^^^^^^^t-:***^^*  **************  *******>i:>!t^**** 
*  * 

*  All  disk  I/O  parameters  are  setup:        * 

*  DISK      is  disk  number      (SELDSK)  * 

*  THK       is  track  number      (SETTEE.)  * 

*  SECT      Is  sector  number     (SETSEC)  * 

*  DMA_ADE   is  the  DMA  1st  offset        * 

*  READ  reads  the  selected  sector  to  the  DMA* 

*  address,  and  V3ITE  writes  the  data  frotr   * 

*  the  DMA  address  to  the  selected  sector    * 

*  * 

-:^**^^^*^^***^iJ:3{:^*jJ:*^**j?^***^*^^*^*j}:  ********* 


READ: 

rrov     al  ,disk 
cmp     al  ,2 
jz       skprd 
mov  cl,4 
sal  el,cl 
or  al , rdcode 
mov  io_com,al 
jmps  execute 

skprd :   jmp  bubrd 

WHITE: 

rrov  al,disk 

cmp  al  ,2 

Jz  skpwrt 

mov   cl,4 
sal    al , cl 
or   al.wrcode 
mov    io_com,al 
jmps  execute 

skpwrt:    jmp  bubwrt 

EXECUTE: 


Jget  disk  number 

Jis  it  the  bubble 

Jif  so  skip  to  tu"bble  read 

Jcoirbine  disk  select  with  opcode 

;create  iopb 

Jjump  to  bubble  read 


Jget  disk  number 

Jis  it  the  bubble 

Jif  so  Jump  to  bubble  write 


Jcreate  iopb  for  write 

Jexecute  disk  routine 
Jjump  to  bubble  write 


outer_retry : 

mov    rtry_ cnt ,max_retries 


retry : 


in  al,rtype 
in  al,rbyte 
call  sendcom 


Jclear  controller 


idle:   in  al ,dstat 
and  alf4 
Jz  idle 


Jwalt  for  completion 
Jready 


check  i.o.  completion  ok 
in  al,rtype 
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00  unlinked  i/o  complete 

10  disk  status  changed 

must  "be  a  00  in  al 

test  al,10t  Jready  status  change? 

JNZ  WREADY 

OR  AL,0 

Jnz  werror  Jsome  other  error,  retry 

check  i/o  error  hits 

in   al,rhyte 

rcl    al,l 

irov    err_code,80b 

Jh   wready  Junit   not    ready 

rcr   al,l 

mov   err_code,al 

and    al,0feh  Jany   other    errors? 

jnz    werror 

read  or  write  is  ok,  al  contains  0 
ret 


01  linked  i/o  comp. 
11  (not  used) 


wready:  ;not  ready,  treat  as  an  error  for  now 

in  al.rryte      Jclear  result  "byte  • 

jmps  trycount 

werror:  Jreturn  hardware  malfunction 
trycount : 

dec  rtry_cnt 

jnz  retry 

mov  al  ,err_code 

mov  ah,0 

mov  hi,ai       Jmake  error  code  16  hits 

mov  tx  ,errthl [EX] 

call  pmsg  Jprint  appropriate  message 

in  al,cdata  Jflush  usart  receiver  huffer 

call  uconecho  Jread  upper  case  console  charact 

cmp  al ,  'C ' 

je  whootl  Jcancel 

cmp  al ,  'R  ' 

Je  outer  retry  Jretry  10  more  times 


cmp  al,'l' 
je  z_ret 
or  al,255 
z  ret:   ret 


Jignore  error 

Jset  code  for  permanent  error 


whoot  1: 


jmp  WEOOT 


Jcan't  make  it  v/  a  short  leap 
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•■'.' 


*  * 

*  seDdcom  sends  the  address  of  the  iopb  to  * 

*  the  1SBC  201  * 

*  * 


sendcom 


MOV  CL,4 

MOV  AX,DMA_SEG 

SAL  AX,CL 

ADD  AX,DMA_ADR 

MOV  10  ADR, AX 

MOV  CL~4 

MOV  AX,CS 

SAL  AX.CL 

ADD  AX,  OFFSET  CEANCMD  J  ADD  SEG  &  OFFSET  FOR  201 

OUt  ll0Vvdl 

mov  cl  ,8 
sar  ax ,cl 
out  ihigh  ,al 
ret 


routine  reads  a  128  byte  sector  from   * 
the  bubble  memory  module.  * 


*  This 

if  £  £  3?  3?  3?  3?  3?  jp  J?  3*  3?  J*  3*  3?  J?  3*  3jt  3*  tf  *  5?  3?  J?  *£  3?  3?  $  3?  £  *  :?  J?  if.  *  3p  33:  *  *  *  3?  3?  3?  #  3?  3?  3* 

bubrd : 


treadl 


rrov  ah,0 

mov  al,trk 

mul  constn 

xor  dx  ,dx 

add  dl.sect 

add  ax,dx 

mov  pageno.ax 

call  vtreg 

push  es 

mov  ax,dma_seg 

mov  es,ax 

mov  hx,128 

mov  di,  dma_adr 

mov  al,rdcmd 

out  cmdsts.al 

irov  cx,0ffffh 

in  al,cmdsts 

test  al,80h 

loopz  treadl 


clea 

get 

mul  t 

clea 

add 

add 

this 

writ 

save 

set 

equa 

128 

set 

get 

send 

set 


r  ah 

track 

iply 

r  dx 

secto 

total 

is  t 
e  par 

ext  r 
the  e 
1  to 
"bytes 
point 
read 

it 
timeo 


register 
number 
by  26 

r  number 

be  page  number 
ametric  regist 
a  segment 
xtra  segment 
the  dma_seg. 

to  be  read 
er      — 
command 

ut  counter 


Jget  status 
Jtest  for  busy 
;wait  for  busy 
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tread2 


bread3: 


skipl 


pause 


toll*: 


cont  in 


errorl 


error2 


jcxz 
mov 

in 
test 

Jz 
in 

stos 
lcop 

mov 

test 

Jz 

dec 

cmp 

Jnz 

sub 

mov 

in 

test 

jz 

mov 

in 

test 

100pDZ 

jcxz 

ior 
pep 
ret 

mov 
call 
call 
call 

mov 
pop 


mov 
call 
call 
call 

mov 
pop 
ret 


errorl 
ex  ,bx 

al  ,cmdsts 

al,01h 

bread3 

al  ,datreg 

al 

tread2 

pause 

dx,0ffffh 

al,80h 

skipl 

dx 

dxf0 

bread2 

"bx  ,cx 
temp3  ,bx 
error2 

al  .cmdsts 
al,80h 
contin 
cx,0ffffh 

al , cmdsts 
al  ,80h 
polio 
errorl 

al  ,al 
es 


bx, off  set 

pmsg 

a  tort 

initb 

al,01h 

es 

ret 

bx ,off set 
pmsg 
a  tort 
initb 

al.Blh 
es 


timeout   error 

load    U   of   "bytes    to    read 

get  status 

test  for  fifo  empty 

yes, check  for  "busy 

no, get  data 

store  it 

go  again 

wait  for  good  status 

timeout  1e  dx  reg 
check  for  "busy 

decrement  timeout  cntr 
compare  timeout  to  0 
still  busy  wait 

bytes  trans  in  bx 
store  byte  transfer  cnt 


Jget  status 
Jcheck  for  busy 
Jnot  busy-send  status 
Jset  up  timeout  cntr. 

Jget    status 

Jcheck   for  busy 

Jwait   for   busy   to   clear 

J  but   not    too    long 

Jreturn   a   0   in   al 
Jreturn   extra   segment 


buberrl 


J  timeout  error 


Jprint  the  message 
Jabort  the  bubble 
initialize  the  bubble 
Jreturn  with  a  1  in  al 
Jreturn  extra  segment 


buberr2 


J  read  op  fail 


Jprint  the  message 
Jabort  the  bubble 
Jinitialize  the  bubble 
Jreturn  with  a  1  in  al 
Jreturn  extra  segment 
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:3^*«j?*^^*^:^:^^:^: 


*  This  rout 

*  Id 


ine  writes  a  1 
to  the  bubble 


26  "byte  sector    * 
memory  * 


tubwrt : 

mov 

mov 

irul 

xor 

add 

add 

mov 

call 

rrov 

rrov 

push 

rrov 

mov 

mov 

out 

mov 

twritel  : 

in 

test 

loopz 

Jcxz 

test 

loopz 

Jcxz 

mov 

twrite2: 

in 

test 

Jz 

lods 

out 

loop 

Jmp 
twrite3 : 

mov 
test 

Jz 
dec 

cmp 

Jnz 

skipll:  sub 

Jrop 
pausel: 

in 


ab,0 
al ,  trk 
constn 
dx  ,dx 
dl  ,sect 
ax  ,dx 
pageno ,ax 
w  treg 

ax  fdma_  seg 
si,dma  adr 
ds 

d  s  ,ax 
bx,128 
al  ,wrtcmd 
cmdsts , al 
cxt0ffffh 

al  ,  cmdsts 

al,80h 

twritel 

errorll 

al,01h 

bwri tel 

errorll 

cx,bx 

al , cmdsts 

al,01h 
bwri te3 
al 

datreg  ,al 
bwrite2 
pausel 

dx,0ffffh 
al,80h 
skipll 
dx 

dx,0  . 
bwrite2 

bx  ,cx 
error22 

al .cmdsts 


clear  ah 
get  track 
mul tiply 
clear  dx 
add  secto 

combine  t 
this  is  t 
write  par 
set  the  d 
set  point 
save  data 
equal  to 
number  of 
load  writ 
send  it 
timeout  c 


regis  ter 

number 
by  26 

r  number 

he  total 

he  page  number 

ametric  regist 

ata    segrrent 

er 

segment 
the  dma_seg 

bytes  to  be 
e  command 

ntr 


Jget  status 

Jcheck  for  busy 

Jwait  for  busy 

J  timeout  error 

Jtest  for  fifo  ready 

Jwait  for  fifo 

; timeout  error 

Jload  #  number  of  bytes 

Jget  status 

Jcheck  for  fifo  ready 

Jno-wai t 

Jyes-get  data 

J  send  data  to  bubble 

Jgo  again 

Jreturn  good  status 

Jset  timeout  cntr 

Jcheck  ofr  busy 

» 

Jdecrement  timeout  cntr. 

Jcompare  timeout  to  zero 

Jtry  again 

J#  of  bytes  transferred 

Jop  fail  error 

J^et  status 
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pollbl: 


continl 


errorll 


test 

Jz 

mov 

in 

test 
loopnz 
jcxz 

xor 

pop 
ret 

[TOV 

call 

call 

pop 

call 

mov 

ret 


al,80h 

continl 

cx,0ffffh 

al tcmdsts 
alt80h 
pollDl 
errorll 

al  ,al 
ds 


bx, off  set 

pmsg 

abort 

ds 

initb 

al,01h 


Jcheck  for  "busy 
Jreturn  op  complete 
Jset  timeout 

Jget  status 
Jcheck  for  busy 
Jbut  not  too  long 
Jbut  not  too  long 


; return 
; return 


buberr3 


a  0  in  al 

the  data  segment 


Jtimeout  failure 


Jabort  the  bubble 
Jreturn  the  data  segment 
Jinitialize  the  bubble 
Jreturn  with  a  1  in  al 


error22 


J  op  fail  msg 


*  Thi 
atort : 


mov  bx, offset  buberr4 

call  prsg 

call  abort  Jabort  the  bubble 

pop  ds  Jreturn  the  data  segment 

call  initb  Jinitialize  the  bubble 

mov  al  ,01h 

ret 

s  routine  aborts  the  bubble  memory.   * 


Jreturn  with  a  1  in  al 


busy: 


poll : 


mov  cx,0ffffb 

mov  bh,40h 

mov  al,abtcmd 

out  cmdsts,al 

in  al,cmdsts 

and  al,80h 

jz  poll 

dec  ex 

xor  ax, ax 

emp  ex, ax 

jnz  busy 

Jmp  retl 

in  al.cmdsts 

test  al,40h 

Jnz  ret2 


init  timeout  cntr 
load  op  comp  bit 
load  abort  command 
issue  it 

get  status 

check  for  busy 

if  busy  jump  to  poll 

else  decrement  ex 

clear  ax  reggg 

heck  timeout  count  =  0 

time  left, try  busy  again 

return  with  error 

get  status 

check  for  status=40h 

return  with  op  comp 
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retl 


ret2: 
loop : 


dec 

XCT 

cmp 
Jnz 

in 

rrov 

call 

ITOV 

pop 
ret 

FOV 
XCT 

dec 
cmp 
jnz 
ret 


ex 

ax  ,ax 
ex  ,ax 
poll 


Jelse  decrement  timeout  cntr 

Jclear  ax 

Jcompare  timeout  to  0 

Jtry  again 


alfcmdsts       Jget  status 

bx,  offset  buberr5      Jabort  fail  msg 

pmsg 

a  1,1  Jreturnalinal 

bx 


dx, 27500 

ax  ,ax 

dx 

dx  ,ax 
loop 


Jreturn  to  system 
Jdelay  100ms 

Jclear  ax 
Jdecrement  count 
J  is  it  zero 
Jno-go  again 
Jyes-return 


*  This  routine  writes  the  values  into  the    * 

*  bubble  memory  parametric  registers.        * 


lilveg : 


mov 

al , hlrpt 

out 

cmdsts ,al 

mov 

bx  ,blklen 

mov 

al,Dl 

out 

datreg,al 

mov 

al  ,nfc 

mov 

cl,4 

shl 

al  ,cl 

or 

al.bh 

out 

datreg ,al 

mov 

al , enable 

out 

datreg ,al 

mov 

bx  ,pageno 

mov 

al,bl 

out 

datreg, al 

mov 

al ,bblnum 

mov 

cl,3 

shl 

al  ,cl 

Jset  register  pointer 
Jset  pointer  in  hmc 
Jload  block  length 

Jthis  series  of  instructions 
Jcombines  block  length 
Jand  the  nfc  value 
Jto  form  a  sixteen  bit 
Jword  to  place  in 
Jthe  block  length 
Jregister 

Jload  enable  register  values 
Jand  send  to  bmc 

Jload  pageno 

Jthis  series  of  instructions 
Jcombines  page  number 
Jand  bubble  number 
Jto  form  a  sixteen  bit 
Jword  to  tlace  in 
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or 

out 

ret 


al,bh 
datreg, al 


Jthe  address 
J  register 


*  Tbis  routine  initializes  the  bubble  memory  * 


initt 


busyl : 


rrov 

al  ,  blrpt 

out 

cmdsts  ,al 

irov 

ti,  0000b. 

mov 

al,bl 

out 

datreg  ,al 

mov 

al,01 

mov 

cl,4 

shl 

al  ,cl 

or 

al  ,bh 

out 

datreg  f al 

mov 

al,20h 

out 

datreg  ,al 

rrov 

ti ,pageno 

mov 

al,bl 

out 

datreg ,al 

mov 

al  ,01h 

mov 

clf3 

shl 

al , cl 

or 

al.bh 

out 

datreg  ,al 

mov 

ci,0ffffh 

mov 

bi,40h 

mov 

al , intcmd 

out 

cmdsts ,al 

in 

al , cmdsts 

and 

al,80h 

jz 

polll 

dec 

CI 

xor 

az  ,ai 

cmp 

ci  ,ai 

jnz 

tusyl 

jmp 

retal 

Jset  pointer 

;  set  pointer  in  bmc 

Jload  init  "block  length 

this  series  of  instructions 

combines  block  length 

and  the  nfc  value 

to  form  a  siiteen  bit 

word  to  place  in 

the  block  length 

regi  ster 

Jload  enable  register  values 
Jand  send  to  bmc 

Jload  init  page  number 

Jthis  series  of  instructions 

Jcombines  page  number 

Jand  bubble  number 

Jto  form  a  sixteen  bit 

Jvord  to  place  in 

Jthe  address 

J  regi  ster 

Jset  timeout  cntr 
Jload  op  comp  status  bit 
Jload  initialize  cmd 
Jsend  it 

Jget  status 
Jcheck  for  busy 
Jif  not  busy  jump 
Jdecrement  timeout  cntr 
Jclear  ai 

Jcompare  timeout  to  zer0 
Jtry  again  if  time  left 
Jtimeout  failure 


polll: 


102 


retal 


reta2: 


in 
ior 

Jz 

dec 

ior 

cmp 
Jnz 

mov 
call 
pop  bx 
ret 

ret 


al  ,cmdsts 

al ,40h 

reta2 

ex 

ax , ax 

ex  ,ax 

polll 


',  get    status 

Jcheck  if  opcomp 

;if  complete  return 

^decrement  timeout  cntr 

Jclear  ax 

Jcompare  timeout  to  0 

Jtry  again 


Jtimeout  failure 


"bx, offset  huberr6 
pmsg  ; 

» 

Jreturn    to   system 

Jreturn    to   routine 


Z^^Z^^^X**  ***********  **************  ***********  #X 

*  Eata   Areas  * 

?:****?*  %l***  ***}:****  ***#*?:*Z;***im*Tm^*1?.*%i*^iZ$Li?1IL* 

data    offset  equ    offset    $ 


dseg 

org 
IOBYTE     dD 
disk  dD 

chencmd  dt 
io_com  do 
Dsec  dD 

trk  do 

sect  do 

I0_AER  EV 
dma_adr  dw 
dma_seg  dw 
pegeDo  dw 
temp2  rw 
constn   dw 

HOrt   COM   EQU   3 
RDCODI     IQU   4 
ERR   CODI   EB    00H 
WRCOEE      IQU    6 


data_off set 
0 


Jcontiguous  with  code  seg 


0 

80h 

0 

1 

0 

0 

0000B 

0e80h 

0 

0 

1 

001ah 


Jdisk  number 
Jiopb  channel  word 

jnumber  sectors  to  xfer 

Jstart  sector 

JPBYS  AEER  FOR  SBC201  USE 

JEMA  adr  (default) 

JEMA  Base  Segment 

Jpage  number  for  bubble  memory 

Jtemporary  storage 

jZG    sectors  per  track 


II 


loader  bios 


i 

•  i 

>  i 


signon  do 
do 


•  i 

>  i 


cr  ,lf ,cr,lf 

'CF/M-66  Version  1.0',crflf,0 


ENEIJ    Jloader  Dios 
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II      not  loader  tios 


>  i  i 
signon  db      cr,lf,cr,lf 

db      'System  Generated  2/22/84' 

do      cr,lf,0 
•  i  i 

>  i  t 

ENDIF        »Dot   loader_bios 

int_trp  do  cr,lf 

-  do  'Interrupt   Trap   Halt' 

do  cr,lf,0 

errtbl  dw  er0,erl ,er2 ,er3 
dw  er4 f er5  ,er6  ,er7 
dw  er8  ,er9  ,erA  ,erB 
dw  erC  ,erD  ,erE  ,erF 
dw    erl0 ,er20 ,er40  ,er80 

er0  do  cr, If, 'Null    Error   ??',0 

erl  do  cr.lf,  'Deleted   Record    :',0 

er2  do  cr,lf,'CRC    Error    :',0 

er3  do  cr, If, 'Data    Overrun-Underrun    :',0 

er4  do  cr, If, 'Seek   Error    :',0 

er5  equ  er0 

er6  equ  er0 

er7  equ  er0 

ere  do  cr , If  , 'Address   Error    :',0 

er9  do  cr,lf,  'Write   Protect    :',0 

erA  db  cr.lf.'ID   CRC    Error    :',0 

erB  db  cr,lff'Write   Error    :',0 

erC  db  cr , If , 'Sector   Not   Found    :',0 

erD  equ  er0 

erE     db  cr,lf,'No  Address  Mark  :'f0 

srF     db  cr, If, 'Data  Mark  Error  :',0 

erl0    equ  er3 

er20    equ  er9 

er40    equ  erB 

er60    db  cr, If, 'Drive  Not  Ready  :',0 

tuberrl  db      cr, If , 'Bubble  Read  Timeout  Error:', 0 

tuberr2  db      cr ,lf , 'Bubble  Read  Failure:', 0 

tuberr3  db      cr, If , 'Bubble  Write  Timeout  Error:', 0 

tuberr4  db      cr ,lf , 'Eubble  Write  Failure:',0 

tuberr5  db      cr , If , 'Bubble  Abort  Failure:', 0 

tuberr6  db      cr  , If  , 'Bubble  Initialize  Failure:', 0 

rtry  cnt  db  0    Jdisk  error  retry  counter 
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;       System  Memory  Segment  Table 

segtable  db  1    ;i  segments 

dw  tpa_seg      »lst  seg  starts  after  BIOS 
dw  tpa'len      Jand  extends  to  08000 

include  singles. lib  Jread  in  disk  definitions 

loc_stk  rw   32   Jlocal  stack  for  initialization 
stkbase  equ  offset  $ 

lastoff  equ  offset  $ 

tpa_seg  equ  (lastoff +0400h+15)  /  16 

tpa  len  equ  0P00h  -  tpa  seg 

db  0     Jfill  last  address  for  GENCMD 

* 3*******3?  ******  ***#****************  ***#***** 
*  * 

*  Dummy  Data  Section  * 

*  * 
********************************************* 

dseg  0       Jabsolute  low  memory 

org  0       J(interrupt  vectors) 

int0_offset     rw      1 

int0_ segment    rw      1 

;       pad  to  system  call  vector 
rw      2*(bdos_int-l) 

tdos_offset     rw      1 
bdos'segment     rw      1 
END 


rtry_cnt  db  0    Jdisk  error  retry  counter 
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